Support for arguments in ejabberdctl that are empty strings.

SVN Revision: 2828

src/ejabberd_ctl.erl

@@ -318,18 +318,19 @@ format_args(Args, ArgsFormat) ->
       [],
       lists:zip(ArgsFormat, Args)).
 
-format_arg(Arg, Format) ->
+format_arg(Arg, integer) ->
-    Parse = case Format of
+    format_arg2(Arg, "~d");
-		integer ->
+format_arg("", string) ->
-		    "~d";
+    "";
-		string ->
+format_arg(Arg, string) ->
-		    NumChars = integer_to_list(string:len(Arg)),
+    NumChars = integer_to_list(string:len(Arg)),
-		    "~" ++ NumChars ++ "c"
+    Parse = "~" ++ NumChars ++ "c",
-	    end,
+    format_arg2(Arg, Parse).
+
+format_arg2(Arg, Parse)->
     {ok, [Arg2], _RemainingArguments} = io_lib:fread(Parse, Arg),
     Arg2.
 
-
 %%-----------------------------
 %% Format result
 %%-----------------------------