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.5 -r1.6
--- openacs-4/packages/assessment/www/admin/asm-action-delete.tcl	12 Jun 2006 02:49:51 -0000	1.5
+++ openacs-4/packages/assessment/www/admin/asm-action-delete.tcl	27 Oct 2014 16:40:59 -0000	1.6
@@ -4,7 +4,7 @@
     @date 07-01-2005
     @cvs-id $Id:
 } {
-    action_id:integer
+    action_id:naturalnum,notnull
 }
 
 set page_title [_ assessment.delete]
@@ -20,7 +20,7 @@
     {submit:text(submit) {label "delete"}}
     {back:text(submit) {label "back"}}
 }  -on_submit {
-    if { $back == "back" } {
+    if { $back eq "back" } {
 	ad_returnredirect "asm-action-admin"
     } else {
 	as::actionparam::actiondelete $action_id