Index: openacs-4/packages/imsld/tcl/imsld-parse-procs.xql
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/imsld/tcl/imsld-parse-procs.xql,v
diff -u -r1.4 -r1.5
--- openacs-4/packages/imsld/tcl/imsld-parse-procs.xql	22 Feb 2006 16:09:39 -0000	1.4
+++ openacs-4/packages/imsld/tcl/imsld-parse-procs.xql	13 Jul 2006 13:11:43 -0000	1.5
@@ -443,5 +443,16 @@
         
 		</querytext>
 	</fullquery>
+
+	<fullquery name="imsld::parse::parse_and_create_imsld_manifest.class_created_p">
+		<querytext>
+        
+        select 1 from imsld_classes
+        where identifier = :class_identifier
+          and method_id = :method_id
+    
+		</querytext>
+	</fullquery>
+
 </queryset>