--- loncom/xml/lontexconvert.pm	2003/02/03 18:03:53	1.14
+++ loncom/xml/lontexconvert.pm	2003/02/05 22:50:44	1.15
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # TeX Conversion Module
 #
-# $Id: lontexconvert.pm,v 1.14 2003/02/03 18:03:53 harris41 Exp $
+# $Id: lontexconvert.pm,v 1.15 2003/02/05 22:50:44 albertel Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -122,20 +122,25 @@ sub to_convert {
 sub msgtexconverted {
     my $message=shift;
 
-    #FIXME this crap needs to go but right now the -L option might be
-    #ignored if this isn;t the first time the tth engine is used
-    #thus the \\document class crap, it makes sure we init the LaTeX stuff
     if ($ENV{'browser.mathml'}) {
-      &tth::ttminit();
-      &tth::ttmoptions("-L");
+	&tth::ttminit();
+	if ($ENV{'browser.unicode'}) {
+	    &tth::ttmoptions('-L -u1');
+	} else {
+	    &tth::ttmoptions('-L -u0');
+	}
     } else {
-      &tth::tthinit();
-      &tth::tthoptions("-L");
+	&tth::tthinit();
+	if ($ENV{'browser.unicode'}) {
+	    &tth::tthoptions('-L -u1');
+	} else {
+	    &tth::tthoptions('-L -u0');
+	}
     }
-    $message=~s/(\$\$.+?\$\$)/&to_convert("\\documentclass{article}".$1)/ge;
-    $message=~s/(\$.+?\$)/&to_convert("\\documentclass{article}".$1)/ge;
-    $message=~s/(\\\(.+?\\\))/&to_convert("\\documentclass{article}".$1)/ge;
-    $message=~s/(\\\[.+?\\\])/&to_convert("\\documentclass{article}".$1)/ge;
+    $message=~s/(\$\$.+?\$\$)/&to_convert($1)/ge;
+    $message=~s/(\$.+?\$)/&to_convert($1)/ge;
+    $message=~s/(\\\(.+?\\\))/&to_convert($1)/ge;
+    $message=~s/(\\\[.+?\\\])/&to_convert($1)/ge;
     return $message.$errorstring;
 }