From 369fefd5a8ca6c42311cbd06ca20b26efe8aea62 Mon Sep 17 00:00:00 2001
From: Badlop <badlop@process-one.net>
Date: Wed, 13 Jul 2011 17:06:17 +0200
Subject: [PATCH] Use #roster record instead of direct tuple

---
 src/mod_disco.erl | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/mod_disco.erl b/src/mod_disco.erl
index 143d57091..7237ada0b 100644
--- a/src/mod_disco.erl
+++ b/src/mod_disco.erl
@@ -49,6 +49,7 @@
 
 -include("ejabberd.hrl").
 -include("jlib.hrl").
+-include("mod_roster.hrl").
 
 start(Host, Opts) ->
     ejabberd_local:refresh_iq_handlers(),
@@ -327,7 +328,7 @@ get_sm_items(empty, From, To, _Node, _Lang) ->
     end.
 
 is_presence_subscribed(#jid{luser=User, lserver=Server}, #jid{luser=LUser, lserver=LServer}) ->
-    lists:any(fun({roster, _, _, {TUser, TServer, _}, _, S, _, _, _, _}) -> 
+    lists:any(fun(#roster{jid = {TUser, TServer, _}, subscription = S}) ->
                             if 
                                 LUser == TUser, LServer == TServer, S/=none ->
                                     true;