--- deliantra/server/ext/chat.ext 2006/12/21 22:41:34 1.2 +++ deliantra/server/ext/chat.ext 2007/01/07 02:39:14 1.3 @@ -35,7 +35,7 @@ cf::register_command listen => sub { my ($who, $msg) = @_; - my $player = cf::player::find $who->name; + my $player = cf::player::find_active $who->name; if ($msg ne "") { my $prev_listen = $player->listening; @@ -171,7 +171,7 @@ my (undef, $nick) = split /\//, $target, 2; $who->message ("You tell $target: $args"); ext::schmorp_irc::do_notice (sprintf "(%s) %s: %s\n", $name, $nick, $msg); - } elsif (my $other = cf::player::find $target) { + } elsif (my $other = cf::player::find_active $target) { if ($msg) { if ($target eq $name) { @@ -207,7 +207,7 @@ my (undef, $nick) = split /\//, $who->{ext_last_tell}, 2; $who->message ("You tell " . $who->{ext_last_tell} . ": $args"); ext::schmorp_irc::do_notice (sprintf "(%s) %s: %s\n", $name, $nick, $args); - } elsif (my $other = cf::player::find $who->{ext_last_tell}) { + } elsif (my $other = cf::player::find_active $who->{ext_last_tell}) { if ($args) { $other->ob->{ext_ignore_tell}{$name} >= time @@ -321,7 +321,7 @@ if (my ($login) = $args =~ /(\S+)/) { if ($login eq $who->name) { $who->message ("Very funny, $login. Ha. Ha.", cf::NDI_UNIQUE); - } elsif (cf::player::find $login) { + } elsif (cf::player::find_active $login) { $who->message ("$login is right here on this server!", cf::NDI_UNIQUE); } elsif (cf::player::exists $login and stat sprintf "%s/%s/%s/%s.pl", cf::localdir, cf::playerdir, ($login) x 2) {