| … | |
… | |
| 363 | CGI::p($pg->{body_text}), |
363 | CGI::p($pg->{body_text}), |
| 364 | CGI::p( |
364 | CGI::p( |
| 365 | CGI::submit(-name=>"submitAnswers", -label=>"Submit Answers"), |
365 | CGI::submit(-name=>"submitAnswers", -label=>"Submit Answers"), |
| 366 | CGI::submit(-name=>"previewAnswers", -label=>"Preview Answers"), |
366 | CGI::submit(-name=>"previewAnswers", -label=>"Preview Answers"), |
| 367 | ), |
367 | ), |
| 368 | $self->viewOptions, |
368 | $self->viewOptions(), |
| 369 | CGI::endform(); |
369 | CGI::endform(); |
| 370 | |
370 | |
| 371 | # feedback form |
371 | # feedback form |
| 372 | my $ce = $self->{courseEnvironment}; |
372 | my $ce = $self->{courseEnvironment}; |
| 373 | my $root = $ce->{webworkURLs}->{root}; |
373 | my $root = $ce->{webworkURLs}->{root}; |