Index: openacs-4/packages/acs-subsite/www/user/email-privacy-level.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-subsite/www/user/email-privacy-level.tcl,v
diff -u -N -r1.5 -r1.6
--- openacs-4/packages/acs-subsite/www/user/email-privacy-level.tcl	7 Aug 2017 23:47:59 -0000	1.5
+++ openacs-4/packages/acs-subsite/www/user/email-privacy-level.tcl	5 Jan 2018 22:40:56 -0000	1.6
@@ -30,10 +30,13 @@
     }
 } -on_request {
     set level [email_image::get_priv_email -user_id $user_id]
+
 } -on_submit {
     email_image::update_private_p -user_id $user_id -level $level
+
 } -after_submit {
     ad_returnredirect $return_url
+    ad_script_abort
 }
 # Local variables:
 #    mode: tcl