| … | |
… | |
| 325 | my $ansEvalDefaults = $courseEnv->{pg}->{ansEvalDefaults}; |
325 | my $ansEvalDefaults = $courseEnv->{pg}->{ansEvalDefaults}; |
| 326 | $envir{$_} = $ansEvalDefaults->{$_} foreach (keys %$ansEvalDefaults); |
326 | $envir{$_} = $ansEvalDefaults->{$_} foreach (keys %$ansEvalDefaults); |
| 327 | |
327 | |
| 328 | # Other things... |
328 | # Other things... |
| 329 | |
329 | |
| 330 | $envir{PROBLEM_GRADER_TO_USE} = $courseEnv->{pg}->{options}->{grader}; |
330 | $envir{PROBLEM_GRADER_TO_USE} = $courseEnv->{pg}->{options}->{grader}; |
|
|
331 | |
|
|
332 | $envir{PRINT_FILE_NAMES_FOR} = $courseEnv->{pg}->{specialPGEnvironmentVars}->{PRINT_FILE_NAMES_FOR}; |
|
|
333 | |
|
|
334 | # variables for interpreting capa problems. |
|
|
335 | $envir{CAPA_Tools} = $courseEnv->{pg}->{specialPGEnvironmentVars}->{CAPA_Tools}; |
|
|
336 | $envir{CAPA_MCTools} = $courseEnv->{pg}->{specialPGEnvironmentVars}->{CAPA_MCTools}; |
|
|
337 | $envir{CAPA_Graphics_URL} = $courseEnv->{pg}->{specialPGEnvironmentVars}->{CAPA_Graphics_URL}; |
|
|
338 | $envir{CAPA_GraphicsDirectory} = $courseEnv->{pg}->{specialPGEnvironmentVars}->{CAPA_GraphicsDirectory}; |
| 331 | |
339 | |
| 332 | return \%envir; |
340 | return \%envir; |
| 333 | } |
341 | } |
| 334 | |
342 | |
| 335 | sub translateDisplayModeNames($) { |
343 | sub translateDisplayModeNames($) { |