| … | |
… | |
| 503 | } |
503 | } |
| 504 | |
504 | |
| 505 | # creates and stores a hash of answer results: $rh_answer_results |
505 | # creates and stores a hash of answer results: $rh_answer_results |
| 506 | if ($answers_submitted == 1) { |
506 | if ($answers_submitted == 1) { |
| 507 | $pt -> process_answers(\%inputs); |
507 | $pt -> process_answers(\%inputs); |
|
|
508 | } |
|
|
509 | else { |
|
|
510 | $pt -> process_answers({}); ## pass a ref to an empty hash to process_answers |
|
|
511 | ## so that problem graders messages will be |
|
|
512 | ## output even when looking at a problem the |
|
|
513 | ## first time |
| 508 | } |
514 | } |
| 509 | #################################################################### |
515 | #################################################################### |
| 510 | # If preview mode has been selected, build the preview page and exit |
516 | # If preview mode has been selected, build the preview page and exit |
| 511 | #################################################################### |
517 | #################################################################### |
| 512 | |
518 | |