--- deliantra/server/lib/cf.pm	2006/07/16 17:29:02	1.20
+++ deliantra/server/lib/cf.pm	2006/07/16 17:51:40	1.21
@@ -172,6 +172,10 @@
 
    warn "removing extension $pkg\n";
 
+   if (my $cb = $pkg->can ("on_unload")) {
+      $cb->($pkg);
+   }
+
    # remove hooks
    for my $idx (0 .. $#EVENT) {
       delete $hook[$idx]{$pkg};
@@ -224,7 +228,7 @@
          delete $INC{"cf.pm"};
 
          # don't, removes xs symbols, too
-         #Symbol::delete_package $pkg;
+         #Symbol::delete_package __PACKAGE__;
 
          require cf;
       };