--- deliantra/maps/perl/cfplus.ext	2006/07/30 19:57:13	1.8
+++ deliantra/maps/perl/cfplus.ext	2006/08/25 15:07:43	1.9
@@ -92,13 +92,13 @@
    ()
 };
 
-sub on_logout {
-   my ($pl, $host) = @_;
-
-   delete $dialog{$_} for grep $pl->ob == $dialog{$_}{ob}, keys %dialog;
-
-   0
-}
+cf::attach_to_players
+   on_logout => sub {
+      my ($pl) = @_;
+
+      delete $dialog{$_} for grep $pl->ob == $dialog{$_}{ob}, keys %dialog;
+   },
+;
 
 sub on_unload {
    while (my ($id, $dialog) = each %dialog) {
@@ -106,8 +106,6 @@
    }
 
    %dialog = ();
-
-   0
 }