Index: openacs-4/packages/categories/tcl/categories-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/categories/tcl/categories-procs.xql,v
diff -u -r1.8.6.4 -r1.8.6.5
--- openacs-4/packages/categories/tcl/categories-procs.xql	31 May 2007 10:03:53 -0000	1.8.6.4
+++ openacs-4/packages/categories/tcl/categories-procs.xql	5 Jun 2007 14:48:21 -0000	1.8.6.5
@@ -1,5 +1,14 @@
 <?xml version="1.0"?>
 <queryset>
+<fullquery name="category::count_children.select">
+        <querytext>
+             select count(*)
+             from categories
+             where parent_id=:category_id
+        </querytext>
+</fullquery>
+
+
 <fullquery name="category::get_children.get_children_ids">
       <querytext>