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

Comparing deliantra/server/ext/schmorplog.ext (file contents):
Revision 1.5 by root, Sun Jan 7 23:10:42 2007 UTC vs.
Revision 1.6 by root, Mon Jan 8 12:39:16 2007 UTC

…		…
30	$UPDATE_LOGINS->start;	30	$UPDATE_LOGINS->start;
31		31
32	warn "LOGIN: ", $pl->ob->name, " from ", $pl->ns->host;	32	warn "LOGIN: ", $pl->ob->name, " from ", $pl->ns->host;
33	},	33	},
34	on_logout => sub {	34	on_logout => sub {
35	my ($pl) = @_;	35	my ($pl, $cleanly) = @_;
36	$pl->ob->set_ob_key_value (schmorplog_last_logout => time);	36	$pl->ob->set_ob_key_value (schmorplog_last_logout => time);
37	ext::schmorp_irc::do_notice (sprintf "%s left", $pl->ob->name);	37	ext::schmorp_irc::do_notice (sprintf "%s left", $pl->ob->name);
38		38
39	$UPDATE_LOGINS->start;	39	$UPDATE_LOGINS->start;
40		40
41	warn "LOGOUT: ", $pl->ob->name, " from ", $pl->ns->host;	41	warn "LOGOUT: ", $pl->ob->name, " from ", $pl->ns->host, " ($cleanly)";
42	},	42	},
43	on_birth => sub {	43	on_birth => sub {
44	my ($pl) = @_;	44	my ($pl) = @_;
45	ext::schmorp_irc::do_notice (sprintf "%s was just born", $pl->ob->name);	45	ext::schmorp_irc::do_notice (sprintf "%s was just born", $pl->ob->name);
46	$pl->ob->set_ob_key_value (schmorplog_birthdate => time);	46	$pl->ob->set_ob_key_value (schmorplog_birthdate => time);

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