Diff for /loncom/interface/lonhelp.pm between versions 1.2 and 1.4

version 1.2, 2002/07/08 20:47:41 version 1.4, 2002/08/09 14:48:31
Line 56  $r->print(<<HEADER); Line 56  $r->print(<<HEADER);
         <title>LON-CAPA Help</title>          <title>LON-CAPA Help</title>
     </head>      </head>
     <body bgcolor="#FFFFFF">      <body bgcolor="#FFFFFF">
       <h3 style="font: sans-serif"><img align="right"
       src="/adm/help/gif/lonhelpheader.gif"/>LON-CAPA Help<hr /></h3>
     <!-- BEGIN -->      <!-- BEGIN -->
 HEADER  HEADER
   
Line 63  HEADER Line 65  HEADER
   
 $r->print(<<FOOTER);  $r->print(<<FOOTER);
     <!-- END -->      <!-- END -->
       <hr />
       <center><font size="-1"><a href="/adm/help/abouthelp.html">About
       LON-CAPA help and More Help</a></font></center>
     </body>      </body>
 </html>  </html>
 FOOTER  FOOTER
Line 90  sub render Line 95  sub render
              '\\end{html}'               '\\end{html}'
              |gxe;               |gxe;
   
       # Backslashes
       $tex =~ s|\\textbackslash|###BACKSLASH###|g;
   
     # Figures leftover without captions      # Figures leftover without captions
     $tex =~ s|  \\includegraphics(\[[^]]*\])*\{([^}]*)\}      $tex =~ s|  \\includegraphics(\[[^]]*\])*\{([^}]*)\}
              |  '\\begin{html}<img src="http://' . $serverroot . '/adm/help/gif/' . $2 . '.gif" border="2"'.               |  '\\begin{html}<img src="http://' . $serverroot . '/adm/help/gif/' . $2 . '.gif" border="2"'.
Line 98  sub render Line 106  sub render
   
     $tex = tth::tth($tex);      $tex = tth::tth($tex);
   
       # Finish backslashes
       $tex =~ s/###BACKSLASH###/'\\'/ge;
    
       # Fix the pretty quotes
       $tex =~ s/('')|(``)/&quot;/g; #" to get emacs syntax highlighter happy
   
     # For some reason all captions come out as "Figure 0:", so      # For some reason all captions come out as "Figure 0:", so
     # just duck the issue...      # just duck the issue...
   

Removed from v.1.2  
changed lines
  Added in v.1.4


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>