$conn = $irc->newconn(%args);
if (!defined $conn) {
- &ERROR("internal: perl IRC connection object does not exist.");
+ &ERROR("IRC: connection failed.");
+ &ERROR("add \"set ircHost 0.0.0.0\" to your config. If that does not work");
+ &ERROR("Please check /etc/hosts to see if you have a localhost line like:");
+ &ERROR("127.0.0.1 localhost localhost");
+ &ERROR("If this is still a problem, please contact the maintainer.");
return 1;
}
foreach $type (keys %dcc) {
next if ($type ne uc($type));
-
+
my $nick;
foreach $nick (keys %{ $dcc{$type} }) {
next unless (defined $nick);