Index: openacs-4/contrib/packages/project-manager/www/task-one.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/task-one.tcl,v
diff -u -r1.24.2.11 -r1.24.2.12
--- openacs-4/contrib/packages/project-manager/www/task-one.tcl	19 Nov 2004 22:43:22 -0000	1.24.2.11
+++ openacs-4/contrib/packages/project-manager/www/task-one.tcl	25 Nov 2004 01:16:08 -0000	1.24.2.12
@@ -79,16 +79,16 @@
 
 # --------------------------------------------------------------- #
 
-# terminology
+# terminology and other parameters
 set task_term       [parameter::get -parameter "TaskName" -default "Task"]
 set task_term_lower [parameter::get -parameter "taskname" -default "task"]
 set assignee_term   [parameter::get -parameter "AssigneeName" -default "Assignee"]
 set watcher_term    [parameter::get -parameter "WatcherName" -default "Watcher"]
 set project_term    [parameter::get -parameter "ProjectName" -default "Project"]
 set use_uncertain_completion_times_p [parameter::get -parameter "UseUncertainCompletionTimesP" -default "1"]
 
+set use_days_p      [parameter::get -parameter "UseDayInsteadOfHour" -default "t"]
 
-
 # the unique identifier for this package
 set package_id  [ad_conn package_id]
 set package_url [ad_conn package_url]
@@ -116,6 +116,13 @@
          -estimated_hours_work_max $task_info(estimated_hours_work_max) \
          -percent_complete $task_info(percent_complete)]
 
+set task_info(days_remaining) \
+    [pm::task::days_remaining \
+         -estimated_hours_work $task_info(estimated_hours_work) \
+         -estimated_hours_work_min $task_info(estimated_hours_work_min) \
+         -estimated_hours_work_max $task_info(estimated_hours_work_max) \
+         -percent_complete $task_info(percent_complete)]
+
 # format the dates according to the local settings
 set task_info(earliest_start)  [lc_time_fmt $task_info(earliest_start) "%x"]
 set task_info(earliest_finish) [lc_time_fmt $task_info(earliest_finish) "%x"]