Index: openacs-4/packages/acs-admin/www/auth/authority-set-enabled-p.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/acs-admin/www/auth/authority-set-enabled-p.tcl,v diff -u -N -r1.5 -r1.6 --- openacs-4/packages/acs-admin/www/auth/authority-set-enabled-p.tcl 7 Aug 2017 23:47:45 -0000 1.5 +++ openacs-4/packages/acs-admin/www/auth/authority-set-enabled-p.tcl 21 Jan 2018 00:38:38 -0000 1.6 @@ -18,12 +18,12 @@ if { $allowed_p } { db_dml set_enabled_p { update auth_authorities set enabled_p = :enabled_p where authority_id = :authority_id } - ad_returnredirect . - ad_script_abort } else { - ad_return_error "Cannot disable authority" "Disabling this authority would mean that all site-wide administrator users are shut out from the system, meaning the system could no longer be administered." + ad_return_error "Cannot disable authority" \ + "Disabling this authority would mean that all site-wide administrator users are shut out from the system, meaning the system could no longer be administered." } +ad_script_abort # Local variables: # mode: tcl