Index: openacs-4/packages/acs-subsite/www/user/password-reset.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/user/password-reset.tcl,v
diff -u -r1.5 -r1.6
--- openacs-4/packages/acs-subsite/www/user/password-reset.tcl	1 Oct 2017 12:16:05 -0000	1.5
+++ openacs-4/packages/acs-subsite/www/user/password-reset.tcl	21 Jan 2018 00:35:30 -0000	1.6
@@ -15,7 +15,10 @@
 }
 
 if { ![auth::password::can_change_p -user_id $user_id] } {
-    ad_return_error "Not supported" "Changing password is not supported."
+    ad_return_error \
+        "Not supported" \
+        "Changing password is not supported."
+    ad_script_abort
 }
 
 set admin_p [permission::permission_p -object_id $user_id -privilege admin]
@@ -25,15 +28,13 @@
 }
 
 
-
 set page_title [_ acs-subsite.Reset_Password]
 set context [list [list [ad_pvt_home] [ad_pvt_home_name]] $page_title]
 
 set system_name [ad_system_name]
 set site_link [ad_site_home_link]
 
 
-
 acs_user::get -user_id $user_id -array user
 
 ad_form -name reset -edit_buttons [list [list [_ acs-kernel.common_update] "ok"]] -form {