--- deliantra/server/ext/commands.ext 2007/01/01 17:50:26 1.10 +++ deliantra/server/ext/commands.ext 2007/01/02 19:18:33 1.11 @@ -138,7 +138,7 @@ my $format = "%2s %1s %3s %5s %-60.60s\n"; - my $msg = sprintf $format, "Pl", "I", "Svd", "Reset", "Name"; + $ob->reply (undef, sprintf $format, "Pl", "I", "Svd", "Reset", "Name"); for (sort keys %cf::MAP) { my $map = $cf::MAP{$_} @@ -149,16 +149,14 @@ my $svd = int $cf::RUNTIME - $map->{last_save}; $svd = "++" if $svd > 99; - $msg .= sprintf $format, + $ob->reply (undef, sprintf $format, (scalar $map->players), $IN_MEMORY{$map->in_memory} || "?", $svd, (int $map->reset_at - $cf::RUNTIME), - $map->{path}->visible_name; + $map->{path}->visible_name); } - $ob->reply (undef, $msg); - 1 };