Index: openacs-4/packages/assessment/www/asm-admin/checks-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/checks-delete.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/assessment/www/asm-admin/checks-delete.tcl	1 Feb 2005 22:00:10 -0000	1.1
+++ openacs-4/packages/assessment/www/asm-admin/checks-delete.tcl	2 Feb 2005 23:09:05 -0000	1.2
@@ -6,6 +6,8 @@
     inter_item_check_id:multiple
     section_id
     assessment_id
+    by_item_p
+    item_id:optional
   }
 set count [llength $inter_item_check_id]
 
@@ -15,4 +17,8 @@
 	db_exec_plsql delete_check {}
     }
 }
-ad_returnredirect "checks-admin?assessment_id=$assessment_id&section_id=$section_id"
\ No newline at end of file
+if {$by_item_p == 1} {
+    ad_returnredirect "checks-admin?section_id=$section_id&assessment_id=$assessment_id&by_item_p=$by_item_p&item_id=$item_id"
+} else {
+    ad_returnredirect "checks-admin?section_id=$section_id&assessment_id=$assessment_id&by_item_p=$by_item_p"
+}
\ No newline at end of file