Index: openacs-4/packages/assessment/www/admin/asm-action-delete.tcl =================================================================== RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/admin/asm-action-delete.tcl,v diff -u -r1.7 -r1.8 --- openacs-4/packages/assessment/www/admin/asm-action-delete.tcl 7 Aug 2017 23:48:04 -0000 1.7 +++ openacs-4/packages/assessment/www/admin/asm-action-delete.tcl 20 Jan 2018 22:38:28 -0000 1.8 @@ -20,14 +20,11 @@ {submit:text(submit) {label "delete"}} {back:text(submit) {label "back"}} } -on_submit { - if { $back eq "back" } { - ad_returnredirect "asm-action-admin" - } else { + if { $back ne "back" } { as::actionparam::actiondelete $action_id - ad_returnredirect "asm-action-admin" - - } + ad_returnredirect "asm-action-admin" + ad_script_abort } # Local variables: