Index: openacs-4/contrib/packages/project-manager/www/tasks.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/tasks.tcl,v
diff -u -r1.12 -r1.13
--- openacs-4/contrib/packages/project-manager/www/tasks.tcl 19 May 2004 20:39:31 -0000 1.12
+++ openacs-4/contrib/packages/project-manager/www/tasks.tcl 3 Jun 2004 21:32:13 -0000 1.13
@@ -49,6 +49,7 @@
set hidden_vars [export_vars -form $exporting_vars]
# how to get back here
set return_url [ad_return_url -qualified]
+set logger_url [pm::util::logger_url]
# set up context bar
set context [list "Tasks"]
@@ -127,14 +128,15 @@
}
actual_hours_worked {
label "Hours completed"
- display_template "@tasks.actual_hours_worked@/@tasks.estimated_hours_work@ (@tasks.percent_complete@\%)"
+ display_template "@tasks.actual_hours_worked@/@tasks.estimated_hours_work@
(@tasks.percent_complete@\%)"
}
project_item_id {
- label "P"
- display_template "P"
+ label "Project"
+ display_col project_name
+ link_url_eval {[export_vars -base one {project_item_id $tasks(project_item_id)}]}
}
log_url {
- label "L"
+ label "Log"
display_template {L}
}
} \
@@ -264,7 +266,7 @@
} {
set item_url [export_vars -base "task-one" {task_id}]
- set log_url [export_vars -base "log" {{pm_task_id $task_id} {pm_project_id $project_item_id} {return_url $return_url}}]
+ set log_url [export_vars -base "${logger_url}log" {{project_id $logger_project} {pm_task_id $task_id} {pm_project_id $project_item_id} {return_url $return_url}}]
set latest_start_pretty [lc_time_fmt $latest_start "%x"]
set latest_finish_pretty [lc_time_fmt $latest_finish "%x"]