If log uses file:write, no need to double escape ~ in messages (EJAB-1696)

diff --git a/src/mod_muc_log.erl b/src/mod_muc_log.erl
index 8c9045f6daa0957211c77a3cc7b1e4f965d94970..b4db67b3de1d52abed2e6e3b9fd1a7443c539178 100644 (file)
--- a/src/mod_muc_log.erl
+++ b/src/mod_muc_log.erl
@@ -779,7 +779,7 @@ fw(F, S, O, FileFormat) ->
                 S1y = ejabberd_regexp:greplace(S1x, ?PLAINTEXT_IN, <<"<">>),
                 ejabberd_regexp:greplace(S1y, ?PLAINTEXT_OUT, <<">">>)
         end,
-    io:format(F, S2, []).
+    file:write(F, S2).
 
 put_header(_, _, _, _, _, _, _, _, _, plaintext) -> ok;
 put_header(F, Room, Date, CSSFile, Lang, Hour_offset,
@@ -1017,7 +1017,7 @@ htmlize2(S1, NoFollow) ->
     S7 = ejabberd_regexp:greplace(S6, <<"\\t">>,
                                  <<"\\&nbsp;\\&nbsp;\\&nbsp;\\&nbsp;">>),
     S8 = ejabberd_regexp:greplace(S7, <<"~">>,
-                                 <<"~~~~">>),
+                                 <<"~~">>),
     ejabberd_regexp:greplace(S8, <<226, 128, 174>>,
                             <<"[RLO]">>).