--- deliantra/maps/perl/schmorp-neko.ext 2006/04/10 08:34:07 1.17 +++ deliantra/maps/perl/schmorp-neko.ext 2006/08/25 15:07:43 1.20 @@ -1,4 +1,5 @@ #! perl +#CONVERSION: NONE # archetype nekosan @@ -115,7 +116,7 @@ $who->{neko_last_attack} = time; $who->{neko_attack}++ - or cf::LOG cf::llevDebug, sprintf "QBERT Neko-san was attacked by %s!\n", $who->name; + or cf::ext::schmorp_irc::do_notice "Neko-san was attacked by ". $who->name . "!\n"; $who->message ("Meoow! (Please do not hurt me)") if !($who->{neko_attack} & 15); @@ -135,5 +136,6 @@ my ($event, $ob, $who, $msg) = @_; cf::LOG cf::llevDebug, sprintf "QBERT [Neko-fon] %s: %s\n", $who->name, $msg; + cf::ext::schmorp_irc::do_notice (sprintf "[Neko-fon] %s: %s\n", $who->name, $msg); }