From 7e90d6cf923327c0f6391b309dfd4ccc46eb2186 Mon Sep 17 00:00:00 2001
From: Badlop <badlop@process-one.net>
Date: Sat, 3 Jul 2010 00:42:54 +0200
Subject: [PATCH] Fix print of command result that contains ~ (thanks to
 Tsukasa Hamano)

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

diff --git a/src/ejabberd_ctl.erl b/src/ejabberd_ctl.erl
index aee1a011f..33b2fe4d0 100644
--- a/src/ejabberd_ctl.erl
+++ b/src/ejabberd_ctl.erl
@@ -201,8 +201,7 @@ process(Args) ->
     case String of
 	[] -> ok;
 	_ ->
-	    io:format(String),
-	    io:format("\n")
+	    io:format("~s~n", [String])
     end,
     Code.