--- deliantra/server/ext/commands.ext 2007/03/02 14:46:29 1.32 +++ deliantra/server/ext/commands.ext 2007/03/02 15:09:05 1.33 @@ -152,10 +152,11 @@ cf::register_command $cmd => sub { my ($ob, $arg) = @_; + $ob->contr->$oncmd (1); + return $ob->reply (undef, "Can't $cmd into a non adjacent square.") if $arg < 0 or $arg >= 9; - $ob->contr->$oncmd (1); $ob->move ($arg); 1