--- loncom/interface/lonprintout.pm 2003/05/14 13:33:27 1.168 +++ loncom/interface/lonprintout.pm 2003/05/14 17:33:59 1.169 @@ -1,7 +1,7 @@ # The LearningOnline Network # Printout # -# $Id: lonprintout.pm,v 1.168 2003/05/14 13:33:27 albertel Exp $ +# $Id: lonprintout.pm,v 1.169 2003/05/14 17:33:59 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1375,6 +1375,8 @@ ENDPART my %form; $form{'grade_target'}='tex'; $form{'textwidth'}=$LaTeXwidth; + my $rndseed=time; + $form{'rndseed'}=$rndseed; &Apache::lonnet::appenv(%moreenv); my $texversion=&Apache::lonnet::ssi($currentURL,%form); &Apache::lonnet::delenv('form.counter'); @@ -1383,6 +1385,7 @@ ENDPART my %form; $form{'grade_target'}='answer'; $form{'answer_output_mode'}='tex'; + $form{'rndseed'}=$rndseed; my $answer=&Apache::lonnet::ssi($currentURL,%form); # $r->print('
'.$answer.'
'); return OK; $texversion=~s/(\\end{document})/$answer$1/;