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 -N -r1.1.2.3 -r1.1.2.4
--- openacs-4/packages/acs-admin/www/users/password-update.tcl	7 Oct 2004 01:18:20 -0000	1.1.2.3
+++ openacs-4/packages/acs-admin/www/users/password-update.tcl	16 Oct 2004 01:13:16 -0000	1.1.2.4
@@ -1,6 +1,16 @@
-<master>
-<property name="title">#dotlrn.Update_Password#</property>
-<property name="context_bar">@context_bar@</property>
+ad_page_contract {
+    Let's the admin change a user's password.
 
-<include src="/packages/acs-admin/lib/password-update" return_url=@return_url@ user_id=@user_id@ >
+    @version $Id$
+} {
+    {user_id:integer}
+    {return_url ""}
+    {password_old ""}
+}
 
+
+set context_bar [list [list users Users] [list "user.tcl?user_id=$user_id" "usuario"] "Update Password"]
+
+set site_link [ad_site_home_link]
+
+ad_return_template
\ No newline at end of file