… | |
… | |
912 | if ($target eq $name) { |
912 | if ($target eq $name) { |
913 | $ns->send_msg ($pl_channel => "You are talking to yourself, you freak!", reply => 1); |
913 | $ns->send_msg ($pl_channel => "You are talking to yourself, you freak!", reply => 1); |
914 | } elsif ($other->ob->{ext_ignore_tell}{$name} >= time) { |
914 | } elsif ($other->ob->{ext_ignore_tell}{$name} >= time) { |
915 | $ns->send_msg ($pl_channel => "$target ignores what you say. Give up on it.", reply => 1); |
915 | $ns->send_msg ($pl_channel => "$target ignores what you say. Give up on it.", reply => 1); |
916 | } else { |
916 | } else { |
917 | return if $other->invoke (cf::EVENT_PLAYER_TOLD, $pl->contr, $msg); |
917 | return if $other->invoke (cf::EVENT_PLAYER_TOLD, $pl, $msg); |
918 | cf::LOG cf::llevDebug, sprintf "TELL [%s>%s] %s\n", $name, $target, $msg; |
918 | cf::LOG cf::llevDebug, sprintf "TELL [%s>%s] %s\n", $name, $target, $msg; |
919 | |
919 | |
920 | $ns->send_msg ($pl_channel => "You tell $target: $msg", reply => 1); |
920 | $ns->send_msg ($pl_channel => "You tell $target: $msg", reply => 1); |
921 | $other->ns->send_msg ($other_channel => "$name tells you: $msg"); |
921 | $other->ns->send_msg ($other_channel => "$name tells you: $msg"); |
922 | } |
922 | } |