[ViewVC] Diff of: cvs/deliantra/maps/perl/schmorplog.ext

Comparing deliantra/maps/perl/schmorplog.ext (file contents):
Revision 1.10 by elmex, Wed Aug 2 16:59:48 2006 UTC vs.
Revision 1.11 by root, Thu Aug 3 11:23:58 2006 UTC

 sub on_login {
    my ($pl, $host) = @_;
    $pl->ob->set_ob_key_value (schmorplog_last_login => time);
-   cf::LOG cf::llevDebug, sprintf "QBERT %s logged in\n",
+#   cf::LOG cf::llevDebug, sprintf "QBERT %s logged in\n",
-      $pl->ob->name, $host;
+#      $pl->ob->name, $host;
    cf::ext::schmorp_irc::do_notice (sprintf "%s logged in", $pl->ob->name);
    0
 }
 sub on_logout {
    my ($pl, $host) = @_;
    $pl->ob->set_ob_key_value (schmorplog_last_logout => time);
-   cf::LOG cf::llevDebug, sprintf "QBERT %s left\n",
+#   cf::LOG cf::llevDebug, sprintf "QBERT %s left\n",
-      $pl->ob->name, $host;
+#      $pl->ob->name, $host;
    cf::ext::schmorp_irc::do_notice (sprintf "%s left", $pl->ob->name);
-   0
-}
-sub on_shout {
-   my ($ob, $msg) = @_;
-   cf::LOG cf::llevDebug, sprintf "QBERT [%s] %s\n",
-      $ob->name, $msg;
    0
 }
 sub on_player_death {
    my ($ob) = @_;
-   cf::LOG cf::llevDebug, sprintf "QBERT %s died a quick and not very horrible death\n",
+#   cf::LOG cf::llevDebug, sprintf "QBERT %s died a quick and not very horrible death\n",
-      $ob->name;
+#      $ob->name;
    cf::ext::schmorp_irc::do_notice (sprintf "%s died a quick and not very horrible death", $ob->name);
    0
 }

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines