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.5 -r1.6
--- openacs-4/packages/assessment/tcl/as-assessment-procs.xql	22 Dec 2004 20:52:17 -0000	1.5
+++ openacs-4/packages/assessment/tcl/as-assessment-procs.xql	7 Jan 2005 16:10:44 -0000	1.6
@@ -76,4 +76,14 @@
 	</querytext>
 </fullquery>
 	
+<fullquery name="as::assessment::unique_name.check_unique">
+	<querytext>
+
+	select count(*)
+	from cr_items
+	where name = :name
+
+	</querytext>
+</fullquery>
+	
 </queryset>