Index: openacs-4/packages/acs-admin/www/users/member-state-change.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/users/member-state-change.tcl,v
diff -u -N -r1.23 -r1.23.2.1
--- openacs-4/packages/acs-admin/www/users/member-state-change.tcl	12 Jun 2018 14:27:23 -0000	1.23
+++ openacs-4/packages/acs-admin/www/users/member-state-change.tcl	17 May 2019 19:28:06 -0000	1.23.2.1
@@ -11,6 +11,7 @@
     {member_state:trim}
     {email_verified_p:boolean ""}
     {return_url:localurl ""}
+    {pass_through:boolean}
 } -validate {
     valid_member_state -requires member_state {
         if {$member_state ni {approved banned deleted merged "needs approval" rejected}} {
@@ -97,6 +98,11 @@
     set return_url [acs_community_member_admin_url -user_id $user_id]
 }
 
+if {$pass_through} {
+    ad_returnredirect $return_url
+    ad_script_abort
+}
+
 set context [list [list "./" "Users"] "$action"]
 set export_vars [export_vars {email email_from subject message return_url}]