[system] / trunk / pg / macros / PG.pl Repository:
ViewVC logotype

Diff of /trunk/pg/macros/PG.pl

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 2983 Revision 2984
174# $main::ans_rule_count = 0; # counts questions 174# $main::ans_rule_count = 0; # counts questions
175 175
176 # end unpacking of environment variables. 176 # end unpacking of environment variables.
177# $main::QUIZ_PREFIX = '' unless defined($main::QUIZ_PREFIX) 177# $main::QUIZ_PREFIX = '' unless defined($main::QUIZ_PREFIX)
178 178
179 if ($main::envir{displayMode} eq 'HTML_jsMath') {
180 my $prefix = "";
181 if (!$main::envir{jsMath}{reportMissingFonts}) {
182 $prefix .= '<SCRIPT>function NoFontMessage() {}</SCRIPT>';
183 } elsif ($main::envir{jsMath}{missingFontMessage}) {
184 $prefix .=
185 '<SCRIPT>'.
186 ' function NoFontMessage() {'.
187 ' document.writeln(\'<DIV CLASS="noFontMessage">'.
188 $main::envir{jsMath}{missingFontMessage}.'</DIV>\');'.
189 ' }' .
190 '</SCRIPT>';
191 }
192 $STRINGforOUTPUT =
193 $prefix .
179 $STRINGforOUTPUT = '<SCRIPT SRC="'.$main::envir{jsMathURL}.'"></SCRIPT>' . "\n" . 194 '<SCRIPT SRC="'.$main::envir{jsMathURL}.'"></SCRIPT>' . "\n" .
180 '<NOSCRIPT><CENTER><FONT COLOR="#CC0000">' . 195 '<NOSCRIPT><CENTER><FONT COLOR="#CC0000">' .
181 '<B>Warning: the mathematics on this page requires JavaScript.<BR>' . 196 '<B>Warning: the mathematics on this page requires JavaScript.<BR>' .
182 'If your browser supports it, be sure it is enabled.</B>'. 197 'If your browser supports it, be sure it is enabled.</B>'.
183 '</FONT></CENTER><p></NOSCRIPT>' . 198 '</FONT></CENTER><p></NOSCRIPT>' .
184 $STRINGforOUTPUT if ($main::envir{displayMode} eq 'HTML_jsMath'); 199 $STRINGforOUTPUT;
200 }
185 201
186 $STRINGforOUTPUT = '<SCRIPT SRC="'.$main::envir{asciimathURL}.'"></SCRIPT>' . "\n" . 202 $STRINGforOUTPUT = '<SCRIPT SRC="'.$main::envir{asciimathURL}.'"></SCRIPT>' . "\n" .
187 '<SCRIPT>mathcolor = "black"</SCRIPT>' . $STRINGforOUTPUT 203 '<SCRIPT>mathcolor = "black"</SCRIPT>' . $STRINGforOUTPUT
188 if ($main::envir{displayMode} eq 'HTML_asciimath'); 204 if ($main::envir{displayMode} eq 'HTML_asciimath');
189 205

Legend:
Removed from v.2983  
changed lines
  Added in v.2984

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9