--- deliantra/server/ext/commands.ext	2007/03/02 10:54:59	1.23
+++ deliantra/server/ext/commands.ext	2007/03/02 11:13:50	1.25
@@ -89,6 +89,15 @@
    1
 };
 
+cf::register_command whereami => sub {
+   my ($ob) = @_;
+
+   my $reg = $ob->region;
+   $ob->reply (undef, (sprintf "You are %s.\n%s", $reg->longname, $reg->msg));
+
+   1
+};
+
 cf::register_command applymode => sub {
    my ($ob, $arg) = @_;
    my @types = ("nochoice", "never", "always");
@@ -192,6 +201,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 +257,6 @@
    1
 };
 
-
 cf::register_command rename => sub {
    my ($ob, $arg) = @_;