--- cf.schmorp.de/maps/perl/schmorp-neko.ext 2006/09/08 17:33:55 1.29 +++ cf.schmorp.de/maps/perl/schmorp-neko.ext 2006/09/18 20:13:04 1.32 @@ -71,7 +71,7 @@ } else { # check for fish in his inv and steal it - if (my $fish = (grep $_->archetype->name eq "fishfood", $pl->inv)[0]) { + if (my $fish = (grep $_->arch->name eq "fishfood", $pl->inv)[0]) { # add force my $gave_fish = cf::object::new "force"; $gave_fish->slaying ("schmorp-neko-gave-fish"); @@ -127,8 +127,8 @@ $hitter->message ("You feel dumb."); } } else { - $hitter->hp (-1); - $hitter->kill_object; +# $hitter->stats->hp (-1); +# $hitter->kill_object; } cf::override;