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.29 -r1.30
--- openacs-4/packages/dotlrn/tcl/community-procs.xql	21 Feb 2002 17:28:17 -0000	1.29
+++ openacs-4/packages/dotlrn/tcl/community-procs.xql	4 Mar 2002 23:54:00 -0000	1.30
@@ -197,6 +197,13 @@
 </querytext>
 </fullquery>
 
+<fullquery name="dotlrn_community::get_subcomm_chunk.select_subcomms">
+<querytext>
+select community_id as subcomm_id from dotlrn_communities where parent_community_id = :community_id
+</querytext>
+</fullquery>
+
+
 <fullquery name="dotlrn_community::get_community_type_package_id.select_package_id">
 <querytext>
 select package_id from dotlrn_community_types where community_type= :community_type