Index: openacs-4/packages/acs-subsite/tcl/group-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/tcl/group-procs.tcl,v
diff -u -r1.39.2.17 -r1.39.2.18
--- openacs-4/packages/acs-subsite/tcl/group-procs.tcl	27 Jun 2017 16:46:21 -0000	1.39.2.17
+++ openacs-4/packages/acs-subsite/tcl/group-procs.tcl	28 Jun 2017 13:17:14 -0000	1.39.2.18
@@ -638,6 +638,10 @@
     if { $group_id eq "" } {
         set result 0
     } else {
+        # Limiting to one row is required for those groups that define
+        # relational segments (e.g. subsites, as for admins, two rows
+        # will be there for both their roles of member and
+        # administrator.
         set result [db_0or1row party_is_member {
             select 1 from group_approved_member_map
             where member_id = :party_id