Index: openacs-4/packages/assessment/www/asm-admin/catalog-browse.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/catalog-browse.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/assessment/www/asm-admin/catalog-browse.tcl 1 Feb 2005 22:00:10 -0000 1.1 +++ openacs-4/packages/assessment/www/asm-admin/catalog-browse.tcl 2 Feb 2005 21:31:15 -0000 1.2 @@ -22,6 +22,8 @@ {page:optional 1} } +set package_id [ad_conn package_id] +permission::require_permission -object_id $package_id -privilege create permission::require_permission -object_id $assessment_id -privilege admin # Get the assessment data