Index: openacs-4/packages/assessment/www/asm-admin/checks-delete-oracle.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/checks-delete-oracle.xql,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/assessment/www/asm-admin/checks-delete-oracle.xql	1 Feb 2005 22:00:10 -0000	1.1
+++ openacs-4/packages/assessment/www/asm-admin/checks-delete-oracle.xql	18 Feb 2005 16:32:28 -0000	1.2
@@ -4,7 +4,7 @@
 <fullquery name="delete_check">
 <querytext>
 	begin
-	as_inter_item_check.delete(:check_id);
+	as_inter_item_check.delete($check_id);
 	end;
 </querytext>
 </fullquery>
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.3 -r1.4
--- openacs-4/packages/assessment/www/asm-admin/checks-delete.tcl	18 Feb 2005 15:39:41 -0000	1.3
+++ openacs-4/packages/assessment/www/asm-admin/checks-delete.tcl	18 Feb 2005 16:32:28 -0000	1.4
@@ -9,7 +9,8 @@
     by_item_p
     item_id:optional
   }
-set inter_item_check_id [split $inter_item_check_id " "]
+set inter_item_check_id [split [lindex $inter_item_check_id 0] " "]
+
 set count [llength $inter_item_check_id]
 
 for { set i 0} { $i< $count } {incr i} {
Index: openacs-4/packages/assessment/www/asm-admin/confirm-delete.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/confirm-delete.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/assessment/www/asm-admin/confirm-delete.adp	18 Feb 2005 16:18:49 -0000	1.2
+++ openacs-4/packages/assessment/www/asm-admin/confirm-delete.adp	18 Feb 2005 16:32:29 -0000	1.3
@@ -2,4 +2,4 @@
 <property name="context">@context;noquote@</property>
 <property name="title">@title;noquote@</property>
 <include src="/packages/assessment/lib/show-check-info">
-<!--formtemplate id=delete_checks></formtemplate--> 
\ No newline at end of file
+<formtemplate id=delete_checks></formtemplate> 
\ No newline at end of file
Index: openacs-4/packages/assessment/www/asm-admin/confirm-delete.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/asm-admin/confirm-delete.tcl,v
diff -u -r1.3 -r1.4
--- openacs-4/packages/assessment/www/asm-admin/confirm-delete.tcl	2 Feb 2005 23:09:05 -0000	1.3
+++ openacs-4/packages/assessment/www/asm-admin/confirm-delete.tcl	18 Feb 2005 16:32:29 -0000	1.4
@@ -10,7 +10,7 @@
     item_id_check:optional
 }
 
-
+set inter_item_check_id [split $inter_item_check_id " "]
 set package_id [ad_conn package_id]
 permission::require_permission -object_id $package_id -privilege create
 permission::require_permission -object_id $assessment_id -privilege admin