Index: openacs-4/packages/acs-admin/www/users/password-update.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/users/password-update.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/acs-admin/www/users/password-update.tcl	7 Aug 2017 23:47:45 -0000	1.5
+++ openacs-4/packages/acs-admin/www/users/password-update.tcl	27 Jun 2018 16:43:34 -0000	1.6
@@ -8,12 +8,11 @@
     {password_old ""}
 }
 
-acs_user::get -user_id $user_id -array userinfo
-set context [list [list "./" "Users"] [list "user.tcl?user_id=$user_id" $userinfo(email)] "Update Password"]
+set email [party::get -party_id $user_id -element email]
+set context [list [list "./" "Users"] [list "user.tcl?user_id=$user_id" $email] "Update Password"]
 
 set site_link [ad_site_home_link]
 
-ad_return_template
 # Local variables:
 #    mode: tcl
 #    tcl-indent-level: 4