[system] / trunk / webwork / system / courseScripts / dangerousMacros.pl Repository:
ViewVC logotype

Diff of /trunk/webwork/system/courseScripts/dangerousMacros.pl

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

Revision 97 Revision 98
394 } 394 }
395 } 395 }
396 396
397 $inputString = $tthPreambleContents . $inputString; 397 $inputString = $tthPreambleContents . $inputString;
398 $inputString = "<<END_OF_TTH_INPUT_STRING;\n\n\n" . $inputString . "\nEND_OF_TTH_INPUT_STRING\necho \"\" >/dev/null"; #it's not clear why another command is needed. 398 $inputString = "<<END_OF_TTH_INPUT_STRING;\n\n\n" . $inputString . "\nEND_OF_TTH_INPUT_STRING\necho \"\" >/dev/null"; #it's not clear why another command is needed.
399 ##WARNING -- how should we get the value of $scriptDirectory to this macro? 399
400 ## perhaps tth belongs in displayMacros??? 400 # $tthpath is now taken from $Global::externalTTHPath via %envir.
401 my $tthpath = "/usr/local/bin/tth"; 401 my $tthpath = $envir{externalTTHPath};
402 my $out; 402 my $out;
403 403
404 if (-x $tthpath ) { 404 if (-x $tthpath ) {
405 my $tthcmd = "$tthpath -L -f5 -r 2>/dev/null " . $inputString; 405 my $tthcmd = "$tthpath -L -f5 -r 2>/dev/null " . $inputString;
406 if (open(TTH, "$tthcmd |")) { 406 if (open(TTH, "$tthcmd |")) {

Legend:
Removed from v.97  
changed lines
  Added in v.98

aubreyja at gmail dot com
ViewVC Help
Powered by ViewVC 1.0.9