Index: openacs-4/packages/assessment/tcl/as-export-procs.tcl
===================================================================
RCS file: /usr/local/cvsroot/openacs-4/packages/assessment/tcl/as-export-procs.tcl,v
diff -u -r1.1 -r1.2
--- openacs-4/packages/assessment/tcl/as-export-procs.tcl	8 Feb 2005 08:49:06 -0000	1.1
+++ openacs-4/packages/assessment/tcl/as-export-procs.tcl	12 Apr 2005 12:55:12 -0000	1.2
@@ -31,6 +31,7 @@
 	    set material [$root createElement material]
             $label appendChild $material
             set mattext [$root createElement mattext]    
+	    $mattext setAttribute texttype text/html
             $material appendChild $mattext    
             set text [$root createCDATASection $value]
             $mattext appendChild $text
@@ -69,4 +70,4 @@
     set text [$root createCDATASection $value]
     $fieldentry appendChild $text
   }  
-}
\ No newline at end of file
+}