--- deliantra/server/ext/chatlog.ext 2007/03/02 00:29:08 1.1 +++ deliantra/server/ext/chatlog.ext 2007/03/02 22:27:38 1.4 @@ -5,7 +5,6 @@ my ($self, $pl, $msg) = @_; my $name = $self->name; - ext::schmorp_irc::do_notice (sprintf "[$name-fon] %s: %s\n", $pl->ob->name, $msg); }, ; @@ -13,17 +12,15 @@ cf::player::attachment "log_told", on_tell => sub { my ($self, $other, $msg) = @_; - - #my $name = $self->name; - - ext::schmorp_irc::do_notice ("[$self->$other]: $msg\n"); + + my $name = $self->ob->name; + ext::schmorp_irc::do_notice ("[$name->$other]: $msg\n"); }, on_told => sub { my ($self, $pl, $msg) = @_; - my $name = $self->name; - - ext::schmorp_irc::do_notice (sprintf "[%s->$name] %s: %s\n", $pl->ob->name, $msg); + my $name = $self->ob->name; + ext::schmorp_irc::do_notice (sprintf "[%s->$name]: %s\n", $pl->ob->name, $msg); }, ;