Index: openacs-4/packages/project-manager/lib/tasks.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/lib/tasks.tcl,v
diff -u -r1.15 -r1.16
--- openacs-4/packages/project-manager/lib/tasks.tcl	23 Aug 2005 16:37:50 -0000	1.15
+++ openacs-4/packages/project-manager/lib/tasks.tcl	4 Sep 2005 12:25:26 -0000	1.16
@@ -83,18 +83,19 @@
 
 set context [list "[_ project-manager.Tasks]"]
 
-# Get the currently available Status
 
-set status_list [db_list_of_lists get_status_values "select description, status_id from pm_task_status order by status_type desc, description"]
+set status_list [lang::util::localize_list_of_lists -list [db_list_of_lists get_status_values "select description, status_id from pm_task_status order by status_type desc, description"]]
 
+set status_list [linsert $status_list 0 [list "All" "-1"]]
+
 # the unique identifier for this package
 
 set package_id [ad_conn package_id]
 set user_id [ad_maybe_redirect_for_registration]
 
 # status defaults to open
 
-if {![exists_and_not_null status_id]} {
+if {![exists_and_not_null status_id] || $status_id == "-1"} {
     set status_where_clause ""
 } else {
     set status_where_clause {ti.status = :status_id}