allow owner to subscribe/get its one node (EJAB-705)

SVN Revision: 1486

diff --git a/ChangeLog b/ChangeLog
index 49c6cb5199e3d620fea08bacd2342ac24533bbb9..af7c9e5c2e9563000bb15ad937e59694c6ee9e8d 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2008-07-23  Christophe Romain  <christophe.romain@process-one.net>
+
+       * src/mod_pubsub/mod_pubsub.erl: Allow owner to subscribe/get its own
+       node (EJAB-705)
+
 2008-07-24  Badlop  <badlop@process-one.net>
 
        * doc/guide.tex: Document room options allow_visitor_nickchange

diff --git a/src/mod_pubsub/mod_pubsub.erl b/src/mod_pubsub/mod_pubsub.erl
index 82a2c483f7334c2b6221cf891fe5d85d5220a040..5df46172d8d593902014da71f0643e0559d92f42 100644 (file)
--- a/src/mod_pubsub/mod_pubsub.erl
+++ b/src/mod_pubsub/mod_pubsub.erl
@@ -2013,7 +2013,8 @@ get_roster_info(OwnerUser, OwnerServer, {SubscriberUser, SubscriberServer, _}, A
          roster_get_jid_info, OwnerServer,
          {none, []},
          [OwnerUser, OwnerServer, {SubscriberUser, SubscriberServer, ""}]),
-    PresenceSubscription = (Subscription == both) orelse (Subscription == from),
+    PresenceSubscription = (Subscription == both) orelse (Subscription == from)
+                           orelse ({OwnerUser, OwnerServer} == {SubscriberUser, SubscriberServer}),
     RosterGroup = lists:any(fun(Group) ->
                                    lists:member(Group, AllowedGroups)
                            end, Groups),