Index: openacs-4/contrib/packages/project-manager/www/tasks.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/tasks.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/contrib/packages/project-manager/www/tasks.tcl	11 Dec 2003 21:39:44 -0000	1.2
+++ openacs-4/contrib/packages/project-manager/www/tasks.tcl	26 Jan 2004 15:39:40 -0000	1.3
@@ -17,6 +17,7 @@
 } {
     orderby:optional
     party_id:optional
+    {searchterm ""}
 } -properties {
     task_term:onevalue
     context_bar:onevalue
@@ -39,9 +40,9 @@
 set user_id    [ad_maybe_redirect_for_registration]
 
 # by default, show this user's tasks
-if {![exists_and_not_null party_id]} {
-    set party_id $user_id
-}
+#if {![exists_and_not_null party_id]} {
+#    set party_id $user_id
+#}
 
 # permissions
 permission::require_permission -party_id $user_id -object_id $package_id -privilege read
@@ -83,18 +84,24 @@
     -actions {
         "Projects" "index" "View list of tasks"
         "Processes" "processes" "View and use processes"
-        "Add task" "task-add-edit" "Add a task"
+        "Add task" "task-select-project" "Add a task"
         "Admin" "admin/" "Administration pages"
     } \
     -main_class {
         narrow
     } \
     -filters {
+        searchterm {
+            label "Search"
+            where_clause { 
+                t.title ilike '%:searchterm%'
+            }
+        }
         party_id {
             label "People"
             values {[db_list_of_lists get_people "select first_names || ' ' || last_name, u.party_id from all_users u, pm_task_assignment a where u.party_id = a.party_id order by upper(first_names), upper(last_name)"]}
             where_clause {
-                ta.party_id = :party_id
+                t.party_id = :party_id
             }
         }
     } \