[ViewVC] Diff of: cvs/deliantra/server/ext/commands.ext

Comparing deliantra/server/ext/commands.ext (file contents):
Revision 1.74 by root, Mon Apr 5 03:22:25 2010 UTC vs.
Revision 1.76 by root, Mon Apr 12 05:22:37 2010 UTC

              "* " . $ob->name . "/" . $ob->level . " " . (length $pl->own_title ? $pl->own_title : "the " . $pl->title)
              . ($pl->gender ? " [f]" : " [m]")
              . ($pl->peaceful ? " [peaceful]" : " [HOSTILE]")
              . ($ns->afk ? " [AFK]" : "")
              . ($ob->flag (cf::FLAG_WIZ) ? " [WIZ]" : "")
-             . " [" . $pl->ns->version . "]"
+             . " [" . $pl->ns->{who_version} . "]"
              . " [" . ($pl->peaceful || $privileged ? $ob->map->visible_name : $ob->region->name) . "]"
              . (sprintf " [rtt %.3fs]", $pl->ns->tcpi_rtt * 1e-6)
              . ($privileged ? " " . $pl->ns->host : "")
           } sort { (lc $a->ob->name) cmp (lc $b->ob->name) } @pl
       ),
    my ($ob, $arg) = @_;
    return $ob->reply (undef, sprintf "Output rate is presently %dbps.", $ob->contr->ns->max_rate / $cf::TICK)
       unless $arg > 0;
-   # minimum is 5k/s
+   $ob->contr->ns->max_rate ((cf::clamp $arg, $OUTPUT_RATE_MIN, $OUTPUT_RATE_MAX) * $TICK);
-   # maximum is 100k/s, this should be configurable
-   $ob->contr->ns->max_rate ((List::Util::max 5000, List::Util::min 100000, $arg) * $cf::TICK);
-   $ob->reply (undef, sprintf "Output rate now set to %dbps.", $ob->contr->ns->max_rate / $cf::TICK);
+   $ob->reply (undef, sprintf "Output rate now set to %dbps.", $ob->contr->ns->max_rate / $TICK);
 };
 cf::register_command 'output-count' => sub {
    my ($ob, $arg) = @_;

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines