From: Evgeniy Khramtsov <ekhramtsov@process-one.net>
Date: Fri, 9 Sep 2016 10:04:47 +0000 (+0300)
Subject: Fix subscribed rooms list retreivement
X-Git-Tag: 16.09~7
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=fe1bf27ef380d4fbb896983573c5b2fd94029c6d;p=ejabberd

Fix subscribed rooms list retreivement
---

diff --git a/src/mod_muc.erl b/src/mod_muc.erl
index 85c0914d1..4eb129a87 100644
--- a/src/mod_muc.erl
+++ b/src/mod_muc.erl
@@ -720,10 +720,11 @@ get_vh_rooms(Host, #rsm_in{max=M, direction=Direction, id=I, index=Index})->
 
 get_subscribed_rooms(ServerHost, Host, From) ->
     Rooms = get_rooms(ServerHost, Host),
+    BareFrom = jid:remove_resource(From),
     lists:flatmap(
       fun(#muc_room{name_host = {Name, _}, opts = Opts}) ->
 	      Subscribers = proplists:get_value(subscribers, Opts, []),
-	      case lists:keymember(From, 1, Subscribers) of
+	      case lists:keymember(BareFrom, 1, Subscribers) of
 		  true -> [jid:make(Name, Host, <<>>)];
 		  false -> []
 	      end;