--- deliantra/server/ext/commands.ext 2007/03/16 02:37:54 1.36 +++ deliantra/server/ext/commands.ext 2007/03/17 22:52:32 1.37 @@ -137,16 +137,6 @@ 1 }; -cf::register_command who => sub { - my ($ob, $arg) = @_; - - $ob->speed_left ($ob->speed_left - 0.25); - - $ob->reply (undef, (join "\n", who_listing $ob->may ("extended_who")), cf::NDI_UNIQUE | cf::NDI_DK_ORANGE); - - 1 -}; - for my $cmd ("run", "fire") { my $oncmd = "${cmd}_on"; cf::register_command $cmd => sub {