Index: openacs-4/packages/dotlrn/www/admin/password-update-2.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/dotlrn/www/admin/Attic/password-update-2.tcl,v
diff -u -r1.2 -r1.2.6.1
--- openacs-4/packages/dotlrn/www/admin/password-update-2.tcl	4 Dec 2002 09:51:04 -0000	1.2
+++ openacs-4/packages/dotlrn/www/admin/password-update-2.tcl	13 May 2004 13:59:30 -0000	1.2.6.1
@@ -31,7 +31,7 @@
 set change_password_url "[ad_url]/user/password-update?[export_vars {user_id {password_old $password_1}}]"
 set body "[_ dotlrn.lt_Please_follow_the_fol]"
 
-set email [db_string select_user_email {}]
+set email [acs_user::get_element -user_id $user_id -element email]
 
 # Send email
 if [catch {ns_sendmail $email $system_owner $subject $body} errmsg] {