Index: openacs-4/packages/assessment/tcl/as-qti-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-qti-procs.tcl,v
diff -u -r1.18 -r1.19
--- openacs-4/packages/assessment/tcl/as-qti-procs.tcl	10 Jan 2005 19:01:13 -0000	1.18
+++ openacs-4/packages/assessment/tcl/as-qti-procs.tcl	18 Jan 2005 12:32:12 -0000	1.19
@@ -21,9 +21,6 @@
 	# XPath v1.0
 	# get all <questestinterop> elements of a XML instance file
 	set questestinteropNodes [$root selectNodes {/questestinterop}]
-	if { [llength $questestinteropNodes] == 0 } {
-        	error "Root node was not <quetestinterop>. The XML file is not valid."
-    	}
 	foreach questestinterop $questestinteropNodes {
 		# Looks for assessments
 		set assessmentNodes [$questestinterop selectNodes {assessment}]