Index: openacs-4/packages/bug-tracker/tcl/bug-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/tcl/bug-procs.xql,v
diff -u -r1.5.2.1 -r1.5.2.2
--- openacs-4/packages/bug-tracker/tcl/bug-procs.xql	1 Dec 2005 13:25:33 -0000	1.5.2.1
+++ openacs-4/packages/bug-tracker/tcl/bug-procs.xql	13 Nov 2006 02:24:39 -0000	1.5.2.2
@@ -104,5 +104,22 @@
       </querytext>
   </partialquery>
 
+  <fullquery name="bug_tracker::bug::get_list.get_distributions">
+    <querytext>
+       select k.heading, k.keyword_id, 
+         (select count(*) 
+          from bt_bugs b 
+          where b.component_id in 
+          (select cm.component_id 
+           from bt_keyword_component_map cm 
+           where cm.keyword_id in 
+           (select kk.keyword_id 
+            from cr_keywords kk 
+            where kk.parent_id = k.keyword_id))) as num_bugs
+       from   cr_keywords k
+       where  k.parent_id = :component_keyword_id
+     </querytext>
+ </fullquery>
+
 </queryset>