Index: openacs-4/packages/project-manager/www/task-print.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/project-manager/www/task-print.tcl,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/project-manager/www/task-print.tcl	26 May 2005 09:34:29 -0000	1.4
+++ openacs-4/packages/project-manager/www/task-print.tcl	28 Jul 2005 10:57:56 -0000	1.5
@@ -46,11 +46,13 @@
     comments_link:onevalue
 } -validate {
     task_id_exists {
+	set user_id    [ad_maybe_redirect_for_registration]
         if {![info exists task_id]} {
             set task_id [db_string get_task_id { }]
         }
     }
     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 { }]
         }
@@ -60,6 +62,11 @@
 
 # --------------------------------------------------------------- #
 
+# the unique identifier for this package
+set package_id [ad_conn package_id]
+set user_id    [ad_maybe_redirect_for_registration]
+
+
 # terminology
 set task_term       [_ project-manager.Task]
 set task_term_lower [_ project-manager.task]
@@ -71,11 +78,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"]