--- loncom/xml/lonxml.pm 2004/07/19 16:48:28 1.331 +++ loncom/xml/lonxml.pm 2004/07/27 23:35:34 1.333 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # XML Parser Module # -# $Id: lonxml.pm,v 1.331 2004/07/19 16:48:28 albertel Exp $ +# $Id: lonxml.pm,v 1.333 2004/07/27 23:35:34 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -400,6 +400,7 @@ sub latex_special_symbols { # any & or # leftover should be safe to just escape $string=~s/([^\\]|^)\&/$1\\\&/g; $string=~s/([^\\]|^)\#/$1\\\#/g; + $string=~s/\|/\$\\mid\$/g; #single { or } How to escape? } return $string; @@ -1126,7 +1127,8 @@ sub inserteditinfo { my $initialize=''; if ($filetype eq 'html') { my $addbuttons=&Apache::lonhtmlcommon::htmlareaaddbuttons(); - $initialize=&Apache::lonhtmlcommon::htmlareaheaders().(< $addbuttons @@ -1156,11 +1158,12 @@ $cleanbut BUTTONS + $buttons.=&Apache::lonhtmlcommon::spelllink('xmledit','filecont'); my $editfooter=(< -
+ $xml_help $buttons