Index: openacs-4/packages/bug-tracker/www/bug.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/bug-tracker/www/bug.tcl,v diff -u -r1.39 -r1.40 --- openacs-4/packages/bug-tracker/www/bug.tcl 29 May 2008 15:09:52 -0000 1.39 +++ openacs-4/packages/bug-tracker/www/bug.tcl 17 Jun 2010 18:51:45 -0000 1.40 @@ -26,8 +26,6 @@ set user_id [ad_conn user_id] -permission::require_permission -object_id $package_id -privilege read - set bug_name [bug_tracker::conn Bug] set page_title [_ bug-tracker.Bug_Title] @@ -58,8 +56,11 @@ -object_id $bug(bug_id) \ -workflow_short_name [bug_tracker::bug::workflow_short_name]] +permission::require_permission -object_id $bug(bug_id) -privilege read + set workflow_id [bug_tracker::bug::get_instance_workflow_id ] +set admin_p [permission::permission_p -object_id $bug(bug_id) -party_id $user_id -privilege admin] ##### #