Index: openacs-4/packages/dotlrn/tcl/community-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/tcl/community-procs.xql,v
diff -u -r1.87.2.3 -r1.87.2.4
--- openacs-4/packages/dotlrn/tcl/community-procs.xql	7 Mar 2006 05:39:34 -0000	1.87.2.3
+++ openacs-4/packages/dotlrn/tcl/community-procs.xql	20 Nov 2006 20:00:16 -0000	1.87.2.4
@@ -191,6 +191,13 @@
         </querytext>
     </fullquery>
 
+    <fullquery name="dotlrn_community::members_count.select_count">
+        <querytext>
+           select count(*) from dotlrn_member_rels_approved where community_id
+      = :community_id
+        </querytext>
+    </fullquery>
+
     <fullquery name="dotlrn_community::member_p.select_count_membership">
         <querytext>
             select count(*)
@@ -202,6 +209,20 @@
         </querytext>
     </fullquery>
 
+    <fullquery name="dotlrn_community::max_members_p.select_max_members">
+        <querytext>
+            select max_members from dotlrn_communities_all
+            where community_id = :community_id
+        </querytext>
+    </fullquery>
+
+    <fullquery name="dotlrn_community::max_members.select_max_members">
+        <querytext>
+            select max_members from dotlrn_communities_all
+            where community_id = :community_id
+        </querytext>
+    </fullquery>
+
     <fullquery name="dotlrn_community::member_pending_p.is_pending_membership">
         <querytext>
             select count(*)