Index: openacs-4/packages/dotlrn-catalog/www/dt-admin/course-list.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-catalog/www/dt-admin/course-list.tcl,v diff -u -r1.5 -r1.6 --- openacs-4/packages/dotlrn-catalog/www/dt-admin/course-list.tcl 21 Feb 2005 19:22:13 -0000 1.5 +++ openacs-4/packages/dotlrn-catalog/www/dt-admin/course-list.tcl 22 Feb 2005 14:54:40 -0000 1.6 @@ -15,6 +15,7 @@ set cc_package_id [apm_package_id_from_key "dotlrn-catalog"] + permission::require_permission -party_id $user_id -object_id $cc_package_id -privilege "create" if {[permission::permission_p -party_id $user_id -object_id $cc_package_id -privilege "admin"]} { @@ -31,9 +32,6 @@ set tree_id "" } - -set asm_package_id [apm_package_id_from_key assessment] - if { [acs_user::site_wide_admin_p] } { if { [info exist keyword] } { set query get_course_info_site_wide_keyword