From 9a55ced505729f803d3e21c3440440d9bb5d9a4c Mon Sep 17 00:00:00 2001
From: Badlop <badlop@process-one.net>
Date: Wed, 23 Feb 2011 16:51:40 +0100
Subject: [PATCH] Fix to show correctly the command that is unknown

---
 src/ejabberd_ctl.erl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/ejabberd_ctl.erl b/src/ejabberd_ctl.erl
index e1fd09d67..e61050363 100644
--- a/src/ejabberd_ctl.erl
+++ b/src/ejabberd_ctl.erl
@@ -283,7 +283,7 @@ call_command([CmdString | Args], Auth, AccessCommands) ->
     Command = list_to_atom(CmdStringU),
     case ejabberd_commands:get_command_format(Command) of
 	{error, command_unknown} ->
-	    {error, io_lib:format("Error: command ~p not known.", [hd(Args)])};
+	    {error, io_lib:format("Error: command ~p not known.", [CmdString])};
 	{ArgsFormat, ResultFormat} ->
 	    case (catch format_args(Args, ArgsFormat)) of
 		ArgsFormatted when is_list(ArgsFormatted) ->