| … | |
… | |
| 14 | |
14 | |
| 15 | use strict; |
15 | use strict; |
| 16 | use warnings; |
16 | use warnings; |
| 17 | use CGI qw(); |
17 | use CGI qw(); |
| 18 | use File::Path qw(rmtree); |
18 | use File::Path qw(rmtree); |
| 19 | use File::Temp qw(tempdir); |
|
|
| 20 | use WeBWorK::Form; |
19 | use WeBWorK::Form; |
| 21 | use WeBWorK::PG; |
20 | use WeBWorK::PG; |
| 22 | use WeBWorK::PG::IO; |
21 | use WeBWorK::PG::IO; |
| 23 | use WeBWorK::Utils qw(writeLog encodeAnswers decodeAnswers ref2string); |
22 | use WeBWorK::Utils qw(writeLog encodeAnswers decodeAnswers ref2string makeTempDirectory); |
| 24 | use WeBWorK::DB::Utils qw(global2user user2global findDefaults); |
23 | use WeBWorK::DB::Utils qw(global2user user2global findDefaults); |
| 25 | |
24 | |
| 26 | ############################################################ |
25 | ############################################################ |
| 27 | # |
26 | # |
| 28 | # user |
27 | # user |
| … | |
… | |
| 811 | . $set->set_id . "." |
810 | . $set->set_id . "." |
| 812 | . $problem->problem_id . "." |
811 | . $problem->problem_id . "." |
| 813 | . $answerResult->{ans_name} . ".png"; |
812 | . $answerResult->{ans_name} . ".png"; |
| 814 | |
813 | |
| 815 | # figure out where to put things |
814 | # figure out where to put things |
| 816 | my $wd = tempdir("webwork-dvipng-XXXXXXXX", DIR => $ce->{courseDirs}->{html_temp}); |
815 | my $wd = makeTempDirectory($ce->{courseDirs}->{html_temp}, "webwork-dvipng"); |
| 817 | my $latex = $ce->{externalPrograms}->{latex}; |
816 | my $latex = $ce->{externalPrograms}->{latex}; |
| 818 | my $dvipng = $ce->{externalPrograms}->{dvipng}; |
817 | my $dvipng = $ce->{externalPrograms}->{dvipng}; |
| 819 | my $targetPath = $ce->{courseDirs}->{html_temp} . $targetPathCommon; |
818 | my $targetPath = $ce->{courseDirs}->{html_temp} . $targetPathCommon; |
| 820 | # should use surePathToTmpFile, but we have to |
819 | # should use surePathToTmpFile, but we have to |
| 821 | # isolate it from the problem enivronment first |
820 | # isolate it from the problem enivronment first |