--- deliantra/server/ext/schmorplog.ext 2007/05/19 11:04:16 1.9 +++ deliantra/server/ext/schmorplog.ext 2007/11/14 08:09:46 1.11 @@ -1,6 +1,8 @@ -#! perl +#! perl # depends=irc + +our $UPDATE_LOGINS = EV::idle Coro::unblock_sub { + $_[0]->stop; -our $UPDATE_LOGINS = Event->idle (repeat => 0, min => 1, data => cf::WF_AUTOCANCEL, cb => Coro::unblock_sub { my ($status, @pl) = ext::commands::who_listing; #TODO: write files asynchronously @@ -12,7 +14,7 @@ s/[<&]//g; print $fh "$_
\n"; } -}); +}; cf::player->attach ( on_login => sub {