--- deliantra/maps/perl/commands.ext 2006/12/12 16:59:34 1.15 +++ deliantra/maps/perl/commands.ext 2006/12/15 19:06:29 1.16 @@ -68,9 +68,10 @@ . ($pl->peaceful ? " [peaceful]" : " [HOSTILE]") . ($ob->flag (cf::FLAG_AFK) ? " [AFK]" : "") . ($ob->flag (cf::FLAG_WIZ) ? " [WIZ]" : "") - . " [" . $pl->client . "]" + . " [" . $pl->socket->client . "]" . " [" . ($pl->peaceful || $privileged ? $ob->map->path : $ob->map->region ? $ob->map->region->name : "the unknown") . "]" - . ($privileged ? " " . $pl->host : "") + . (sprintf " [rtt %.3fs/%.3f]", $pl->socket->rtt * 1e-6, $pl->socket->rttvar * 1e-6) + . ($privileged ? " " . $pl->socket->host : "") } sort { (lc $a->ob->name) cmp (lc $b->ob->name) } @pl ), eval { "* IRC: " . join ", ", ext::schmorp_irc::users },