Index: openacs-4/contrib/packages/project-manager/www/index.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/index.tcl,v
diff -u -r1.9.2.1 -r1.9.2.2
--- openacs-4/contrib/packages/project-manager/www/index.tcl	4 Dec 2003 21:00:13 -0000	1.9.2.1
+++ openacs-4/contrib/packages/project-manager/www/index.tcl	5 Dec 2003 01:09:19 -0000	1.9.2.2
@@ -17,6 +17,7 @@
 } {
     orderby_project:optional
     status_id:optional
+    category_id:optional
 } -properties {
 
     context:onevalue
@@ -57,6 +58,12 @@
 
 # Projects, using list-builder ---------------------------------
 
+
+
+set category_choices [db_list_of_lists gg "select t.name, t.category_id from category_tree_map tm, categories c, category_translations t where c.tree_id = tm.tree_id and c.category_id = t.category_id and tm.object_id = :package_id"]
+
+
+
 template::list::create \
     -name projects \
     -multirow projects \
@@ -77,6 +84,10 @@
             label "Hours completed"
             display_template "@projects.actual_hours_completed@/@projects.estimated_hours_total@"
         }
+        category_id {
+            label "Categories"
+            display_template "<group column=\"item_id\"><li>@projects.category_name@</group>"
+        }
     } \
     -actions {
         "Tasks" "tasks" "View list of tasks"
@@ -97,19 +108,26 @@
         }
         category_id {
             label "Category"
-            values {[db_list_of_lists get_category "select description, category_id from pm_project_category order by category_id"]}
+            values {$category_choices}
             where_clause {
+                om.category_id = :category_id
             }
         }
     } \
     -orderby {
-        default_value project_name,asc
+        default_value category_id,asc
         project_name {
             label "Project name"
             orderby_desc "upper(p.title) desc"
             orderby_asc "upper(p.title) asc"
             default_direction asc
         }
+        category_id {
+            label "Categories"
+            orderby_desc "c.category_name desc"
+            orderby_asc "c.category_name asc"
+            default_direction asc
+        }
     } \
     -orderby_name orderby_project \
     -html {