Index: openacs-4/packages/acs-subsite/www/permissions/one-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/one-oracle.xql,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/acs-subsite/www/permissions/one-oracle.xql	28 Nov 2001 18:39:39 -0000	1.2
+++ openacs-4/packages/acs-subsite/www/permissions/one-oracle.xql	7 Dec 2001 22:45:41 -0000	1.3
@@ -68,5 +68,16 @@
       </querytext>
 </fullquery>
 
+<fullquery name="children_count">      
+      <querytext>
+
+	select count(*) as num_children
+	from acs_objects o
+	where context_id = :object_id and
+            acs_permission.permission_p(o.object_id, :user_id, 'admin') = 't'
+
+      </querytext>
+</fullquery>
+
  
 </queryset>