--- loncom/xml/lonxml.pm	2001/05/04 16:10:17	1.69
+++ loncom/xml/lonxml.pm	2001/05/04 17:33:35	1.70
@@ -37,6 +37,15 @@ sub xmlend {
     return '</html>';
 }
 
+sub fontsettings() {
+    my $headerstring='';
+    if (($ENV{'browser.os'} eq 'mac') && (!$ENV{'browser.mathml'})) { 
+         $headerstring.=
+             '<meta Content-Type="text/html; charset=x-mac-roman">';
+    }
+    return $headerstring;
+}
+
 sub registerurl {
   return (<<ENDSCRIPT);
 <script language="JavaScript">