Index: openacs-4/packages/acs-subsite/www/permissions/grant-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/Attic/grant-oracle.xql,v
diff -u -N -r1.1 -r1.1.4.1
--- openacs-4/packages/acs-subsite/www/permissions/grant-oracle.xql	30 Apr 2001 22:02:48 -0000	1.1
+++ openacs-4/packages/acs-subsite/www/permissions/grant-oracle.xql	13 Mar 2003 14:05:33 -0000	1.1.4.1
@@ -13,8 +13,10 @@
 <fullquery name="parties">      
       <querytext>
       
-  select party_id, acs_object.name(party_id) as name
-  from parties
+  select p.party_id, 
+         acs_object.name(p.party_id) || nvl2(p.email, ' ('||p.email||')', '') as name
+  from   parties p
+  order  by name
 
       </querytext>
 </fullquery>
Index: openacs-4/packages/acs-subsite/www/permissions/grant-postgresql.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/permissions/Attic/grant-postgresql.xql,v
diff -u -N -r1.2 -r1.2.4.1
--- openacs-4/packages/acs-subsite/www/permissions/grant-postgresql.xql	30 Apr 2001 22:02:48 -0000	1.2
+++ openacs-4/packages/acs-subsite/www/permissions/grant-postgresql.xql	13 Mar 2003 14:05:33 -0000	1.2.4.1
@@ -13,8 +13,10 @@
 <fullquery name="parties">      
       <querytext>
       
-  select party_id, acs_object__name(party_id) as name
-  from parties
+  select p.party_id, 
+         acs_object__name(p.party_id)|| coalesce(' ('||p.email||')', '') as name
+  from   parties p
+  order  by name
 
       </querytext>
 </fullquery>
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"
 }