--- deliantra/server/ext/irc.ext 2007/12/28 19:49:29 1.10 +++ deliantra/server/ext/irc.ext 2008/08/26 02:05:48 1.12 @@ -7,10 +7,10 @@ return unless exists $cf::CFG{irc_server}; -my $BOTSERVER = $cf::CFG{irc_server}; -my $BOTPORT = $cf::CFG{irc_port}; -my $BOTNAME = $cf::CFG{irc_nick}; -my $BOTCHAN = $cf::CFG{irc_chan}; +my $BOTSERVER = $cf::CFG{irc_server} || "localhost"; +my $BOTPORT = $cf::CFG{irc_port} || 6667; +my $BOTNAME = $cf::CFG{irc_nick} || "server"; +my $BOTCHAN = $cf::CFG{irc_chan} || "cf"; my $CON; # the connection @@ -89,7 +89,7 @@ if ($tmsg =~ /^\!/) { handle_fcmd ($name, $nick, $tmsg); } elsif ($tmsg =~ m/\S/) { - $_->ns->send_msg ($ext::chat::CHAT_CHANNEL, + $_->ns->send_msg ($cf::CHAT_CHANNEL, "$name/".$nick." chats: $tmsg", cf::NDI_BLUE | cf::NDI_DEF ) for grep { $_->ob->{ext_ignore_shout}{$name} < $NOW && $_->listening >= 10 } cf::player::list; cf::LOG cf::llevDebug, sprintf "QBERT [%s] %s\n", "$name/$nick", $tmsg;