--- deliantra/maps/perl/schmorp-neko.ext	2006/08/02 16:59:48	1.18
+++ deliantra/maps/perl/schmorp-neko.ext	2006/08/25 15:07:43	1.20
@@ -1,4 +1,5 @@
 #! perl
+#CONVERSION: NONE
 
 # archetype nekosan
 
@@ -115,10 +116,7 @@
 
    $who->{neko_last_attack} = time;
    $who->{neko_attack}++
-      or do {
-         cf::LOG cf::llevDebug, my $n = sprintf "QBERT Neko-san was attacked by %s!\n", $who->name;
-         cf::ext::schmorp_irc::do_notice ($n);
-      };
+      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);