| … | |
… | |
| 392 | # attempt summary |
392 | # attempt summary |
| 393 | if ($submitAnswers or $will{showCorrectAnswers}) { |
393 | if ($submitAnswers or $will{showCorrectAnswers}) { |
| 394 | # print this if user submitted answers OR requested correct answers |
394 | # print this if user submitted answers OR requested correct answers |
| 395 | print $self->attemptResults($pg, $submitAnswers, |
395 | print $self->attemptResults($pg, $submitAnswers, |
| 396 | $will{showCorrectAnswers}, |
396 | $will{showCorrectAnswers}, |
| 397 | $pg->{flags}->{showPartialCorrectAnswers}, 1, 0); |
397 | $pg->{flags}->{showPartialCorrectAnswers}, 1, 1); |
| 398 | } elsif ($checkAnswers) { |
398 | } elsif ($checkAnswers) { |
| 399 | # print this if user previewed answers |
399 | # print this if user previewed answers |
| 400 | print $self->attemptResults($pg, 1, 0, 1, 1, 0); |
400 | print $self->attemptResults($pg, 1, 0, 1, 1, 1); |
| 401 | # show attempt answers |
401 | # show attempt answers |
| 402 | # don't show correct answers |
402 | # don't show correct answers |
| 403 | # show attempt results (correctness) |
403 | # show attempt results (correctness) |
| 404 | # don't show attempt previews |
404 | # don't show attempt previews |
| 405 | } elsif ($previewAnswers) { |
405 | } elsif ($previewAnswers) { |
| … | |
… | |
| 719 | } else { |
719 | } else { |
| 720 | return "<b>[math2img failed]</b>"; |
720 | return "<b>[math2img failed]</b>"; |
| 721 | } |
721 | } |
| 722 | } |
722 | } |
| 723 | } |
723 | } |
|
|
724 | |
|
|
725 | sub info { |
|
|
726 | |
|
|
727 | return "Identifying information goes here"; |
|
|
728 | |
|
|
729 | } |
| 724 | ##### logging subroutine #### |
730 | ##### logging subroutine #### |
| 725 | |
731 | |
| 726 | |
732 | |
| 727 | |
733 | |
| 728 | ##### permission queries ##### |
734 | ##### permission queries ##### |
Parent Directory
| 
Revision Log
| 
Patch