Index: openacs-4/packages/courses/www/cc-admin/grant-user-list.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/courses/www/cc-admin/grant-user-list.tcl,v diff -u -r1.3 -r1.4 --- openacs-4/packages/courses/www/cc-admin/grant-user-list.tcl 3 Feb 2005 22:41:28 -0000 1.3 +++ openacs-4/packages/courses/www/cc-admin/grant-user-list.tcl 8 Feb 2005 23:07:53 -0000 1.4 @@ -14,12 +14,12 @@ creation_user:notnull } -set user_id [auth::get_user_id] +set user_id [ad_conn user_id] # course_catalog package_id set cc_package_id [apm_package_id_from_key "courses"] set page_title "[_ courses.search_users_to] $course_key" -set context [list [list "/courses/cc-admin/grant-list" "[_ courses.grant] [_ courses.course_list]"] "[_ courses.search_u]"] +set context [list [list course-list "[_ courses.course_list]"] "[_ courses.search_u]"] if {[string equal $return_url ""]} { set return_url "/courses/admin/grant-list" } @@ -64,7 +64,7 @@ } template::list::create \ - -name grant_list \ + -name grant_list \ -multirow grant_list \ -key p_user_id \ -bulk_actions {"\#courses.grant\#" "grant-permission" "\#courses.grant_per\#"\