Index: openacs-4/packages/acs-admin/www/users/modify-admin-privileges.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/users/modify-admin-privileges.adp,v
diff -u -r1.3 -r1.3.2.1
--- openacs-4/packages/acs-admin/www/users/modify-admin-privileges.adp	27 Oct 2014 16:38:57 -0000	1.3
+++ openacs-4/packages/acs-admin/www/users/modify-admin-privileges.adp	20 Oct 2015 10:45:00 -0000	1.3.2.1
@@ -2,7 +2,8 @@
 <property name="doc(title)">Confirm privilege modification for user #@user_id;noquote@</property>
 <property name=context>@context;noquote@</property>
 
-Are you sure you wish to @action@ admin privileges for user #@user_id@?
+Are you sure you wish to @action@ admin privileges for user
+<strong>@user_info.name@</strong> (@user_info.email@, #@user_id@) ?
 
 <p></p>
 
Index: openacs-4/packages/acs-admin/www/users/modify-admin-privileges.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/users/modify-admin-privileges.tcl,v
diff -u -r1.5.2.2 -r1.5.2.3
--- openacs-4/packages/acs-admin/www/users/modify-admin-privileges.tcl	8 Oct 2015 19:28:03 -0000	1.5.2.2
+++ openacs-4/packages/acs-admin/www/users/modify-admin-privileges.tcl	20 Oct 2015 10:45:00 -0000	1.5.2.3
@@ -11,7 +11,8 @@
 }
 
 set confirmed_url [export_vars -base /acs-admin/users/modify-admin-privileges {
-    user_id:sign(max_age=60) action:sign {confirmed_p 1}}]
+    user_id:sign(max_age=60) action:sign {confirmed_p 1}
+}]
 set return_url [export_vars -base /acs-admin/users/one {user_id}]
 
 set context [list [list "./" "Users"] "Modify privileges"]
@@ -30,6 +31,9 @@
     util_memoize_flush_regexp "^permission::.*-party_id $user_id"
 }
 
+acs_user::get -user_id $user_id -array user_info
+
+
 # Local variables:
 #    mode: tcl
 #    tcl-indent-level: 4