--- deliantra/server/ext/schmorp-clientchk.ext	2006/12/16 13:30:17	1.3
+++ deliantra/server/ext/schmorp-clientchk.ext	2006/12/21 23:37:05	1.5
@@ -2,11 +2,11 @@
 
 # check client version and string for old clients and possibly issue warnings for them
 
-cf::attach_to_players
+cf::player->attach (
    on_login => sub {
       my ($pl) = @_;
 
-      my $client = $pl->socket->version;
+      my $client = $pl->ns->version;
 
       my $is_cf = $client =~ /^(?:GTK|X11) (?:Unix|Win32) Client ([.0-9]+)/
                   ? join "", map chr, split /\./, $1
@@ -18,12 +18,12 @@
 
       if ($is_cf) { # && $is_cf lt v1.9.2) {
          $pl->ob->message ("(enabling workaround for client buffer overflow)", cf::NDI_RED | cf::NDI_UNIQUE);
-         $pl->socket->buggy_mapscroll (1);
+         $pl->ns->buggy_mapscroll (1);
       }
 
       if ($is_jx) {
          $pl->ob->message ("(enabling buggy map scroll workaround)", cf::NDI_RED | cf::NDI_UNIQUE);
-         $pl->socket->buggy_mapscroll (1);
+         $pl->ns->buggy_mapscroll (1);
       }
 
       if ($is_jx) {
@@ -46,5 +46,5 @@
 EOF
       }
    },
-;
+);