Index: openacs-4/contrib/packages/project-manager/www/task-print.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/contrib/packages/project-manager/www/Attic/task-print.tcl,v diff -u -r1.3.2.7 -r1.3.2.8 --- openacs-4/contrib/packages/project-manager/www/task-print.tcl 4 May 2005 06:13:53 -0000 1.3.2.7 +++ openacs-4/contrib/packages/project-manager/www/task-print.tcl 14 Jun 2005 17:52:48 -0000 1.3.2.8 @@ -51,6 +51,7 @@ } } revision_id_exists { + set user_id [ad_maybe_redirect_for_registration] if {![info exists task_revision_id]} { set task_revision_id [db_string get_revision_id { }] } @@ -59,6 +60,8 @@ # --------------------------------------------------------------- # +# the unique identifier for this package +set package_id [ad_conn package_id] # terminology set task_term [parameter::get -parameter "TaskName" -default "Task"] @@ -72,10 +75,6 @@ set context_bar [ad_context_bar "one?project_item_id=$project_item_id $project_term" "[_ project-manager.View]"] -# the unique identifier for this package -set package_id [ad_conn package_id] -set user_id [ad_maybe_redirect_for_registration] - set comments [general_comments_get_comments -print_content_p 1 -print_attachments_p 1 $task_id "[ad_conn url]?task_id=$task_id"] set comments_link [general_comments_create_link -object_name pm_task -link_text "Add a comment" -context_id $package_id $task_id "[ad_conn url]?task_id=$task_id"]