Index: openacs-4/packages/assessment/www/asm-admin/bulk-mail.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/bulk-mail.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/assessment/www/asm-admin/bulk-mail.tcl	30 Mar 2005 17:33:21 -0000	1.3
+++ openacs-4/packages/assessment/www/asm-admin/bulk-mail.tcl	26 Sep 2006 00:22:46 -0000	1.4
@@ -8,6 +8,11 @@
     d_state
 }
 
+permission::require_permission \
+    -object_id [ad_conn package_id] \
+    -party_id [ad_conn user_id] \
+    -privilege admin
+
 if {[llength $action_log_id] == 1} { 
 set action_log_id [split [lindex $action_log_id  0] " "]
 }