--- deliantra/server/ext/irc.ext 2007/10/05 08:14:23 1.7 +++ deliantra/server/ext/irc.ext 2008/05/02 16:09:36 1.11 @@ -38,7 +38,7 @@ if ($msg eq "!who") { # clobbers irc, http is available - do_notice "see http://cf.schmorp.de/userlist.crossfire.schmorp.de.html"; + do_notice "see http://www.deliantra.net/userlist.crossfire.schmorp.de.html"; # do_notice $_ # for ext::commands::who_listing (0, "."); @@ -89,9 +89,10 @@ 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; } 1; }, @@ -107,11 +108,7 @@ ); } -Event->timer ( - reentrant => 0, - after => 1, - interval => 30, - data => cf::WF_AUTOCANCEL, - cb => Coro::unblock_sub { check_connection }, -); +our $RECONNECT = cf::periodic 30, Coro::unblock_sub { + check_connection; +};