Index: openacs-4/packages/assessment/www/admin/unzip-file.adp
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/admin/Attic/unzip-file.adp,v
diff -u -r1.2 -r1.3
--- openacs-4/packages/assessment/www/admin/unzip-file.adp	22 Sep 2004 15:27:09 -0000	1.2
+++ openacs-4/packages/assessment/www/admin/unzip-file.adp	22 Sep 2004 19:37:30 -0000	1.3
@@ -1,7 +1,7 @@
 <master>
 <property name="title">Assessment</property>
 <property name="context">@context;noquote@</property>
-<if @qti_items_imported_number@># items imported: @qti_items_imported_number@</if><br>
+Assessment Imported Correctly!
 <br>
 <a href="show-items">Show items</a>
 <a href="index">Upload files</a>
Index: openacs-4/packages/assessment/www/admin/unzip-file.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/www/admin/Attic/unzip-file.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/assessment/www/admin/unzip-file.tcl	21 Sep 2004 17:35:40 -0000	1.1
+++ openacs-4/packages/assessment/www/admin/unzip-file.tcl	22 Sep 2004 19:37:30 -0000	1.2
@@ -20,11 +20,9 @@
 # UNZIP the zip file in the temporary directory
 catch { exec unzip ${zipfile.tmpfile} -d $tmpdirectory } outMsg
 
-set qti_items_imported_number 0
 # Read the content of the temporary directory
 foreach file_i [ glob -directory $tmpdirectory *{.xml}  ] {
-	set items [llength [parse_qti_xml $file_i]]
-	set qti_items_imported_number [expr [llength items]  + $qti_items_imported_number]	
+	parse_qti_xml $file_i
 }
 
 # Delete the temporary directory