Index: openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl,v
diff -u -r1.25.2.5 -r1.25.2.6
--- openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl	26 Jan 2005 22:56:34 -0000	1.25.2.5
+++ openacs-4/packages/bug-tracker/tcl/bug-tracker-procs.tcl	27 Jan 2005 02:29:32 -0000	1.25.2.6
@@ -472,6 +472,31 @@
     return $result
 }
 
+ad_proc bug_tracker::category_get_filter_data_not_cached {
+    {-package_id:required}
+    {-parent_id:required}
+} {
+    @param package_id The package (project) to select from
+    @param parent_id The category type's keyword_id
+    @return list-of-lists with category data for filter
+} {
+    return [db_list_of_lists select {}]
+}
+
+ad_proc bug_tracker::category_get_filter_data {
+    {-package_id:required}
+    {-parent_id:required}
+} {
+    @param package_id The package (project) to select from
+    @param parent_id The category type's keyword_id
+    @return list-of-lists with category data for filter
+} {
+    return [util_memoize [list bug_tracker::category_get_filter_data_not_cached \
+                             -package_id $package_id \
+                             -parent_id $parent_id]]
+}
+
+
 ad_proc bug_tracker::category_get_options {
     {-package_id ""}
     {-parent_id:required}
@@ -802,6 +827,24 @@
 #
 #####
 
+ad_proc bug_tracker::component_get_filter_data_not_cached {
+    {-package_id:required}
+} {
+    @param package_id The project we're interested in
+    @return list-of-lists with component data for filter
+} {
+    return [db_list_of_lists select {}]
+}
+
+ad_proc bug_tracker::component_get_filter_data {
+    {-package_id:required}
+} {
+    @param package_id The project we're interested in
+    @return list-of-lists with component data for filter
+} {
+    return [util_memoize [list bug_tracker::component_get_filter_data_not_cached \
+                             -package_id $package_id]]
+}
 ad_proc bug_tracker::components_get_options {
     {-package_id ""}
     -include_unknown:boolean
@@ -1194,3 +1237,75 @@
 	}
     }
 }
+
+ad_proc bug_tracker::version_get_filter_data_not_cached {
+    {-package_id:required}
+} {
+    @param package_id The package (project) to select from
+    @return list-of-lists with fix-for-version data for filter
+} {
+    return [db_list_of_lists select {}]
+}
+
+ad_proc bug_tracker::version_get_filter_data {
+    {-package_id:required}
+} {
+    @param package_id The package (project) to select from
+    @return list-of-lists with fix-for-version data for filter
+} {
+    return [util_memoize [list bug_tracker::version_get_filter_data_not_cached \
+                             -package_id $package_id]] 
+}
+
+ad_proc bug_tracker::assignee_get_filter_data_not_cached {
+    {-package_id:required}
+    {-workflow_id:required}
+    {-action_id:required}
+} {
+    @param package_id The package (project) to select from
+    @param workflow_id The workflow we're interested in
+    @param action_id The action we're interested in
+    @return list-of-lists with assignee data for filter
+} {
+    return [db_list_of_lists select {}]
+}
+
+ad_proc bug_tracker::assignee_get_filter_data {
+    {-package_id:required}
+    {-workflow_id:required}
+    {-action_id:required}
+} {
+    @param package_id The package (project) to select from
+    @param workflow_id The workflow we're interested in
+    @param action_id The action we're interested in
+    @return list-of-lists with assignee data for filter
+} {
+    return [util_memoize [list bug_tracker::assignee_get_filter_data_not_cached \
+                             -package_id $package_id \
+                             -workflow_id $workflow_id \
+                             -action_id $action_id]] 
+}
+
+ad_proc bug_tracker::state_get_filter_data_not_cached {
+    {-package_id:required}
+    {-workflow_id:required}
+} {
+    @param package_id The package (project) to select from
+    @param workflow_id The workflow we're interested in
+    @return list-of-lists with state data for filter
+} {
+    return [db_list_of_lists select {}]
+}
+
+ad_proc bug_tracker::state_get_filter_data {
+    {-package_id:required}
+    {-workflow_id:required}
+} {
+    @param package_id The package (project) to select from
+    @param workflow_id The workflow we're interested in
+    @return list-of-lists with state data for filter
+} {
+    return [util_memoize [list bug_tracker::state_get_filter_data_not_cached \
+                             -package_id $package_id \
+                             -workflow_id $workflow_id]]
+}