Index: openacs-4/packages/project-manager/www/task-add-edit.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/www/task-add-edit.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/project-manager/www/task-add-edit.tcl 26 May 2005 09:34:29 -0000 1.4
+++ openacs-4/packages/project-manager/www/task-add-edit.tcl 3 Jun 2005 22:13:44 -0000 1.5
@@ -187,10 +187,8 @@
-selected $this_project]
# find out the default logger variable for this project
- set logger_project [pm::project::get_logger_project \
- -project_item_id $this_project]
- set logger_variable_id [logger::project::get_primary_variable \
- -project_id $logger_project]
+ set logger_project [lindex [application_data_link::get_linked -from_object_id $this_project -to_object_type logger_project] 0]
+ set logger_variable_id [logger::project::get_primary_variable -project_id $logger_project]
set today_date [db_string today "select to_date(sysdate,'YYYY-MM-DD') from dual"]
set today_html$task "
y-m-d "