--- deliantra/server/ext/login.ext	2007/06/10 03:15:17	1.51
+++ deliantra/server/ext/login.ext	2007/06/11 21:38:13	1.53
@@ -1,4 +1,4 @@
-#! perl # MANDATORY
+#! perl # mandatory
 
 # login handling
 
@@ -6,6 +6,8 @@
 use Coro::AIO;
 use List::Util qw(min max);
 
+our %EXT_SETUP;
+
 # paranoia function to overwrite a string-in-place
 sub nuke_str {
    substr $_[0], 0, (length $_[0]), "x" x length $_[0]
@@ -614,7 +616,7 @@
                      my $a_ = $pl->refcnt;#d#
                      my $b_ = $ob->refcnt;#d#
 
-                     warn "player-scheduler refcnt ", $ob->name, " pp$pl_ref,pc$a_ op$ob_ref,oc$b_\n";#d#
+                     warn "player-scheduler refcnt ", $ob->name, " pl $pl_ref ob $ob_ref (C pl $a_ ob $b_)\n";#d#
                   }
                }
             }