--- deliantra/server/ext/schmorplog.ext	2007/01/08 12:39:16	1.6
+++ deliantra/server/ext/schmorplog.ext	2007/01/24 16:29:10	1.7
@@ -1,8 +1,9 @@
 #! perl
 
-our $UPDATE_LOGINS = Event->idle (repeat => 0, min => 1, data => cf::WF_AUTOCANCEL, cb => sub {
+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
    open my $fh, ">", cf::localdir . "/usercount";
    print $fh scalar @pl;