diff options
author | Badlop <badlop@process-one.net> | 2011-07-13 19:12:51 +0400 |
---|---|---|
committer | Badlop <badlop@process-one.net> | 2011-07-13 19:12:51 +0400 |
commit | b0755c7cfbdaae681f51e7487108c3b8044ea5da (patch) | |
tree | 9c5fcc97f0bb37b9bcc88b76a64265ea11f0681d | |
parent | c5cf9b4e6df80fbf3648cbeb1d561c55fe54816e (diff) |
Use #roster record instead of direct tuple
-rw-r--r-- | src/mod_disco.erl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/mod_disco.erl b/src/mod_disco.erl index ab959896d..54832b63a 100644 --- a/src/mod_disco.erl +++ b/src/mod_disco.erl @@ -51,6 +51,7 @@ -include_lib("exmpp/include/exmpp.hrl"). -include("ejabberd.hrl"). +-include("mod_roster.hrl"). -include_lib("stdlib/include/ms_transform.hrl"). start(Host, Opts) when is_list(Host) -> @@ -316,7 +317,7 @@ is_presence_subscribed(From, To) -> Server = exmpp_jid:prep_domain(From), LUser = exmpp_jid:prep_node(To), LServer = exmpp_jid:prep_domain(To), - lists:any(fun({roster, _, _, {TUser, TServer, _}, _, S, _, _, _, _}) -> + lists:any(fun(#roster{jid = {TUser, TServer, _}, subscription = S}) -> if LUser == TUser, LServer == TServer, S/=none -> true; |