Index: openacs-4/packages/project-manager/tcl/status-procs.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/tcl/status-procs.tcl,v diff -u -r1.4 -r1.5 --- openacs-4/packages/project-manager/tcl/status-procs.tcl 9 Jun 2005 16:40:39 -0000 1.4 +++ openacs-4/packages/project-manager/tcl/status-procs.tcl 12 Mar 2006 16:54:58 -0000 1.5 @@ -13,14 +13,14 @@ namespace eval pm::status {} ad_proc -public pm::status::open_p { - -task_status_id:required + -project_status_id:required } { - Returns t if the task status code is open, f otherwise + Returns t if the project status code is open, f otherwise @author Jade Rubick (jader@bread.com) @creation-date 2004-05-21 - @param task_status_id + @param project_status_id @return @@ -31,9 +31,9 @@ SELECT case when status_type = 'c' then 'f' else 't' end FROM - pm_task_status + pm_project_status WHERE - status_id = :task_status_id + status_id = :project_status_id }] return $return_val