--- deliantra/server/ext/chat.ext 2007/04/13 05:32:12 1.13 +++ deliantra/server/ext/chat.ext 2007/04/27 00:49:58 1.15 @@ -38,6 +38,8 @@ my $player = cf::player::find_active $pl->name; if ($msg ne "") { + $msg = 10 if $msg > 10; + my $prev_listen = $player->listening; $player->listening ($msg); if ($prev_listen == $player->listening) { @@ -825,7 +827,6 @@ my $name = $pl->name; my $NOW = time; - utf8::encode $msg; # ->message not yet utf8-ified cf::LOG cf::llevDebug, sprintf "QBERT [%s] %s\n", $name, $msg; ext::schmorp_irc::do_notice (sprintf "[%s] %s", $name, $msg);