--- deliantra/server/ext/schmorp-neko.ext 2007/02/13 21:28:11 1.3 +++ deliantra/server/ext/schmorp-neko.ext 2007/06/11 22:18:03 1.5 @@ -1,4 +1,4 @@ -#! perl +#! perl # depends=irc # archetype nekosan @@ -113,7 +113,7 @@ $hitter->{neko_last_attack} = time; $hitter->{neko_attack}++ - or ext::schmorp_irc::do_notice "Neko-san was attacked by ". $hitter->name . "!\n"; + or ext::irc::do_notice "Neko-san was attacked by ". $hitter->name . "!\n"; $hitter->message ("Meoow! (Please do not hurt me)") if !($hitter->{neko_attack} & 15); @@ -136,7 +136,7 @@ sub on_say { my ($self, $pl, $msg) = @_; - ext::schmorp_irc::do_notice (sprintf "[Neko-fon] %s: %s\n", $pl->ob->name, $msg); + ext::irc::do_notice (sprintf "[Neko-fon] %s: %s\n", $pl->ob->name, $msg); } cf::object::attachment "Nekosan", package => __PACKAGE__;