Support SSL Irc connections

In "irc" settings simply add "ssl: 1" for SSL connections.

diff --git a/docbot.pl b/docbot.pl
index 1f35bfbc56ff941c6b87e763c4088f785ece2a7f..91d4519c2124d7c6c24b3a7a7c70397b6eaa5388 100755 (executable)
--- a/docbot.pl
+++ b/docbot.pl
@@ -169,12 +169,14 @@ foreach my $session (keys(%main::sessions)) {
     my $server = config_get_key2('irc', 'server');
     my $port = config_get_key2('irc', 'port');
     $port = (length($port) > 0 and $port =~ /^\d+$/) ? $port : '6667';
+    my $ssl = config_get_key2('irc', 'ssl') ? 1 : undef;
     my $irc = POE::Component::IRC->spawn(
                   Nick => $main::sessions{$session}{'nickname'},
                   Ircname => $name,
                   Server => $server,
                   Port => $port,
-                  Raw => 1
+                  Raw => 1,
+                  UseSSL => $ssl,
               );
     if (!$irc) {
         print_msg("Could not spawn POE session: $!", ERROR);