From 8295bcebec5d1079110a41cf891818ab7131a4bc Mon Sep 17 00:00:00 2001 From: Evgeny Khramtsov Date: Mon, 10 Dec 2018 17:06:21 +0300 Subject: [PATCH] Fix (un)setting of priority --- src/ejabberd_sm.erl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/ejabberd_sm.erl b/src/ejabberd_sm.erl index 821a7883e..6c00815d5 100644 --- a/src/ejabberd_sm.erl +++ b/src/ejabberd_sm.erl @@ -317,7 +317,7 @@ set_presence(SID, User, Server, Resource, Priority, Presence) -> case get_sessions(Mod, LUser, LServer, LResource) of [] -> {error, notfound}; Ss -> - case lists:keyfind(SID, 1, Ss) of + case lists:keyfind(SID, #session.sid, Ss) of #session{info = Info} -> set_session(SID, User, Server, Resource, Priority, Info), ejabberd_hooks:run(set_presence_hook, @@ -339,7 +339,7 @@ unset_presence(SID, User, Server, Resource, Status) -> case get_sessions(Mod, LUser, LServer, LResource) of [] -> {error, notfound}; Ss -> - case lists:keyfind(SID, 1, Ss) of + case lists:keyfind(SID, #session.sid, Ss) of #session{info = Info} -> set_session(SID, User, Server, Resource, undefined, Info), ejabberd_hooks:run(unset_presence_hook,