Index: openacs-4/packages/acs-subsite/www/permissions/grant.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/grant.tcl,v
diff -u -N -r1.2 -r1.2.2.1
--- openacs-4/packages/acs-subsite/www/permissions/grant.tcl	6 Sep 2002 21:50:06 -0000	1.2
+++ openacs-4/packages/acs-subsite/www/permissions/grant.tcl	13 Mar 2003 14:05:33 -0000	1.2.2.1
@@ -27,11 +27,7 @@
 
 <select name=privilege>
 "
-db_foreach privileges {
-  select privilege
-  from acs_privileges
-  order by privilege
-} {
+db_foreach privileges {} {
   doc_body_append "<option value=$privilege>$privilege</option>\n"
 }
 
@@ -41,10 +37,7 @@
 <select name=party_id>
 "
 
-db_foreach parties {
-  select party_id, acs_object.name(party_id) as name
-  from parties
-} {
+db_foreach parties {} {
   doc_body_append "<option value=$party_id>$name</option>\n"
 }