![[BACK]](/icons/back.gif){kind=icon}
Return to lonxml.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / xml|
Return to lonxml.pm CVS log | Up to [LON-CAPA] / loncom / xml |
| version 1.69, 2001/05/04 16:10:17 | version 1.70, 2001/05/04 17:33:35 |
|---|---|
| Line 37 sub xmlend { | Line 37 sub xmlend { |
| return '</html>'; | 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 { | sub registerurl { |
| return (<<ENDSCRIPT); | return (<<ENDSCRIPT); |
| <script language="JavaScript"> | <script language="JavaScript"> |