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.37 -r1.38 --- openacs-4/packages/project-manager/lib/tasks.tcl 13 Nov 2005 13:24:13 -0000 1.37 +++ openacs-4/packages/project-manager/lib/tasks.tcl 13 Nov 2005 19:25:58 -0000 1.38 @@ -159,7 +159,7 @@ slack_time \ role \ latest_start \ - latest_finish \ + end_date \ status_type \ remaining \ worked \ @@ -607,12 +607,13 @@ if { $sysdate > $latest_start } { set red_title_p 1 } - } else { + } elseif {[exists_and_not_null end_date]} { if { $sysdate > $end_date } { set red_title_p 1 } + } else { + set red_title_p 0 } - if {[exists_and_not_null earliest_start_j]} { set slack_time [pm::task::slack_time \