Index: openacs-4/packages/dotlrn-catalog/www/admin/grant-users.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn-catalog/www/admin/grant-users.tcl,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/dotlrn-catalog/www/admin/grant-users.tcl	16 Feb 2005 00:22:12 -0000	1.2
+++ openacs-4/packages/dotlrn-catalog/www/admin/grant-users.tcl	2 Nov 2005 20:30:22 -0000	1.3
@@ -6,17 +6,16 @@
     @creation-date   29-01-2005
 } {
     p_user_id:multiple
-    { user_name "" }
-    { user_email "" }
+    { keyword ""}
 } 
 
 # dotlrn_catalog package_id
-set cc_package_id [apm_package_id_from_key "dotlrn-catalog"]
+set cc_package_id [ad_conn package_id]
 
 # Grants Permission for all the users in p_user_id
 foreach user $p_user_id {
     permission::grant -party_id $user -object_id $cc_package_id  -privilege "create"
 }
 
 
-ad_returnredirect "grant-list?user_name=$user_name&user_email=$user_email"
+ad_returnredirect "grant-list?keyword=$keyword"