Welcome to mirror list, hosted at ThFree Co, Russian Federation.

github.com/processone/ejabberd.git - Unnamed repository; edit this file 'description' to name the repository.
summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBadlop <badlop@process-one.net>2013-06-25 12:37:10 +0400
committerBadlop <badlop@process-one.net>2013-06-25 12:37:10 +0400
commit8220db189f4ea08a7268f90c70440062c11e0228 (patch)
tree9753ac14b06a7bc4a5706973cbbd85e73ca5e77f
parent45db79b9a7160357eebb43192b93be83bf1f3ea5 (diff)
list_to_integer/2 only works in OTP R14 and newer
-rw-r--r--src/mod_muc/mod_muc_log.erl6
1 files changed, 6 insertions, 0 deletions
diff --git a/src/mod_muc/mod_muc_log.erl b/src/mod_muc/mod_muc_log.erl
index e4b355924..d3ba8fd68 100644
--- a/src/mod_muc/mod_muc_log.erl
+++ b/src/mod_muc/mod_muc_log.erl
@@ -322,9 +322,15 @@ htmlize_nick(Nick1, html) ->
htmlize_nick(Nick1, plaintext) ->
htmlize(?PLAINTEXT_IN++Nick1++?PLAINTEXT_OUT, plaintext).
+%% list_to_integer/2 was introduced in OTP R14
+-ifdef(SSL40).
set_filemode(Fn, {FileMode, FileGroup}) ->
ok = file:change_mode(Fn, list_to_integer(integer_to_list(FileMode), 8)),
ok = file:change_group(Fn, FileGroup).
+-else.
+set_filemode(Fn, {_FileMode, FileGroup}) ->
+ ok = file:change_group(Fn, FileGroup).
+-endif.
add_message_to_log(Nick1, Message, RoomJID, Opts, State) ->
#logstate{out_dir = OutDir,