Index: openacs-4/contrib/packages/project-manager/www/task-add-edit-2.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/task-add-edit-2.tcl,v diff -u -r1.1.2.6 -r1.1.2.7 --- openacs-4/contrib/packages/project-manager/www/task-add-edit-2.tcl 16 Dec 2004 16:22:53 -0000 1.1.2.6 +++ openacs-4/contrib/packages/project-manager/www/task-add-edit-2.tcl 21 Dec 2004 15:00:33 -0000 1.1.2.7 @@ -63,6 +63,7 @@ set use_days_p [parameter::get -parameter "UseDayInsteadOfHour" -default "t"] foreach i $number { + set date_$i [split [lindex $date [expr $i-1]] "-"] set end_date_${i}(day) [lindex [set date_$i] 2] set end_date_${i}(month) [lindex [set date_$i] 1] @@ -167,6 +168,7 @@ set logger_project [pm::project::get_logger_project \ -project_item_id $project_item_id($num)] + if {[exists_and_not_null hours($num)]} { pm::project::log_hours \ @@ -178,21 +180,23 @@ -project_item_id $project_item_id($num) \ -update_status_p f \ -party_id $user_id \ - -timestamp_ansi "[set log_date_${num}_year]-[set log_date_${num}_month]-[set log_date_${num}_day]" + -timestamp_ansi [set log_date_${num}(date)] } # --------- # edit task # --------- + + set dead_line "[set end_date_${num}(year)]-[set end_date_${num}(month)]-[set end_date_${num}(day)]" set task_revision \ [pm::task::edit \ -task_item_id $task_item_id($num) \ -project_item_id $project_item_id($num) \ -title $task_title($num) \ -description $description($num) \ -mime_type $description_mime_type($num) \ - -end_date "[set end_date_${num}(year)]-[set end_date_${num}(month)]-[set end_date_${num}(day)]"\ + -end_date [set end_date_${num}(date)] \ -percent_complete $percent_complete($num) \ -estimated_hours_work $estimated_hours_work($num) \ -estimated_hours_work_min $estimated_hours_work_min($num) \ @@ -293,7 +297,7 @@ -title $task_title($num) \ -description $description($num) \ -mime_type $description_mime_type($num) \ - -end_date "[set end_date_${num}(year)]-[set end_date_${num}(month)]-[set end_date_${num}(day)]"\ + -end_date [set end_date_${num}(date)]\ -percent_complete $percent_complete($num) \ -estimated_hours_work $estimated_hours_work($num) \ -estimated_hours_work_min $estimated_hours_work_min($num) \