Index: openacs-4/packages/assessment/tcl/as-assessment-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-assessment-procs.xql,v
diff -u -r1.6 -r1.7
--- openacs-4/packages/assessment/tcl/as-assessment-procs.xql	7 Jan 2005 16:10:44 -0000	1.6
+++ openacs-4/packages/assessment/tcl/as-assessment-procs.xql	14 Jan 2005 13:13:37 -0000	1.7
@@ -86,4 +86,15 @@
 	</querytext>
 </fullquery>
 	
+<fullquery name="as::assessment::unique_name.check_unique_excluding_item">
+	<querytext>
+
+	select count(*)
+	from cr_items
+	where name = :name
+	and item_id <> :item_id
+
+	</querytext>
+</fullquery>
+	
 </queryset>