Index: openacs-4/packages/assessment/www/asm-admin/unzip-file.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/unzip-file.tcl,v diff -u -r1.1 -r1.2 --- openacs-4/packages/assessment/www/asm-admin/unzip-file.tcl 1 Feb 2005 22:00:10 -0000 1.1 +++ openacs-4/packages/assessment/www/asm-admin/unzip-file.tcl 26 Sep 2006 00:22:46 -0000 1.2 @@ -9,6 +9,10 @@ qti_items_imported_number context:onevalue } +permission::require_permission \ + -object_id [ad_conn package_id] \ + -party_id [ad_conn user_id] \ + -privilege "admin" set context [list "[_ assessment.Import_Results]"]