--- deliantra/server/ext/commands.ext 2007/03/02 10:54:59 1.23 +++ deliantra/server/ext/commands.ext 2007/03/02 11:07:59 1.24 @@ -192,6 +192,30 @@ 1 }; +cf::register_command 'output-count' => sub { + my ($ob, $arg) = @_; + + return $ob->reply (undef, "Output count is presently " . $ob->contr->outputs_count) + unless $arg > 0; + + $ob->contr->outputs_count ($arg); + $ob->reply (undef, "Output count now set to " . $ob->contr->outputs_count); + + 1 +}; + +cf::register_command 'output-sync' => sub { + my ($ob, $arg) = @_; + + return $ob->reply (undef, "Output sync time is presently " . $ob->contr->outputs_sync) + unless $arg > 0; + + $ob->contr->outputs_sync ($arg); + $ob->reply (undef, "Output sync time now set to " . $ob->contr->outputs_sync); + + 1 +}; + # XXX: This has a bug. After one sets his wimpy level to 0 and resets it to # some other level (which may also be 0), this does not get echoed, # but it does get set. @@ -224,7 +248,6 @@ 1 }; - cf::register_command rename => sub { my ($ob, $arg) = @_;