[system] / trunk / pg / lib / Value / AnswerChecker.pm Repository:
ViewVC logotype

Diff of /trunk/pg/lib/Value/AnswerChecker.pm

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

Revision 3487 Revision 3488
478# 478#
479# Quote HTML characters 479# Quote HTML characters
480# 480#
481sub protectHTML { 481sub protectHTML {
482 my $string = shift; 482 my $string = shift;
483 return unless defined($string);
483 return $string if eval ('$main::displayMode') eq 'TeX'; 484 return $string if eval ('$main::displayMode') eq 'TeX';
484 $string =~ s/&/\&/g; 485 $string =~ s/&/\&/g;
485 $string =~ s/</\&lt;/g; 486 $string =~ s/</\&lt;/g;
486 $string =~ s/>/\&gt;/g; 487 $string =~ s/>/\&gt;/g;
487 $string; 488 $string;

Legend:
Removed from v.3487  
changed lines
  Added in v.3488

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9