aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBadlop <badlop@process-one.net>2009-06-25 18:05:12 +0000
committerBadlop <badlop@process-one.net>2009-06-25 18:05:12 +0000
commit523239d5a7c1a5d732de7e3960bc4039b35eefe2 (patch)
tree55e78c96cb9cb7929fa7bedc09f53e87d337387b
parentImprove explanation about SSL for port 5223 and its option 'tls'. (diff)
Don't use lists:keyfind/3 bcause it was introduced only in recent R13A.
SVN Revision: 2341
-rw-r--r--src/ejabberd_loglevel.erl4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/ejabberd_loglevel.erl b/src/ejabberd_loglevel.erl
index 2a340606b..dcb23d8a5 100644
--- a/src/ejabberd_loglevel.erl
+++ b/src/ejabberd_loglevel.erl
@@ -59,8 +59,8 @@ set(_) ->
exit("Loglevel must be an integer").
level_to_integer(Level) ->
- case lists:keyfind(Level, 2, ?LOG_LEVELS) of
- {Int, Level, _Desc} -> Int;
+ case lists:keysearch(Level, 2, ?LOG_LEVELS) of
+ {value, {Int, Level, _Desc}} -> Int;
_ -> erlang:error({no_such_loglevel, Level})
end.