--- cf.schmorp.de/maps/perl/schmorp-neko.ext	2006/09/18 20:13:04	1.32
+++ cf.schmorp.de/maps/perl/schmorp-neko.ext	2006/12/12 16:59:34	1.33
@@ -13,7 +13,7 @@
 
    $portal->apply ($pl);
 
-   $portal->free;
+   $portal->destroy;
 }
 
 sub find_target_player {
@@ -66,7 +66,7 @@
                $pl->message ("(Neko-san makes strange noises)");
                $pl->cast_spell ($self, $dir, $spell);
 
-               $spell->free;
+               $spell->destroy;
             }
 
          } else {
@@ -79,8 +79,7 @@
                $gave_fish->insert_ob_in_ob ($pl);
 
                # remove fish
-               $fish->remove;
-               $fish->free;
+               $fish->destroy;
 
                # be nice
                $pl->message ("Meoww! (Thank you)");