Parent Directory
|
Revision Log
-Fixed a few interfaces so that they make more sense (I hope) -Added preliminary templating code to ContentGenerator -Added a lot of logic to the dispatcher (WeBWorK.pm). More to come, too. -Moved lots of things over to CGI.pm, for my convenience while prototyping -Added preliminary examples of ProblemSets, ProblemSet, and Problem. Problem.pm will some day go on to do what ProcessProblem8 does right now, so keep your eyes on that one. --Dennis
1 package WeBWorK::ProblemSet; 2 our @ISA = qw(WeBWorK::ContentGenerator); 3 4 use WeBWorK::ContentGenerator; 5 use Apache::Constants qw(:common); 6 use CGI qw(-compile :html :form); 7 8 sub go() { 9 my ($self, $problem_set) = @_; 10 my $r = $self->{r}; 11 my $courseEnvironment = $self->{courseEnvironment}; 12 my $user = $r->param('user'); 13 14 $self->header; return OK if $r->header_only; 15 $self->top("Problem set $problem_set for $user"); 16 print startform({-method=>"POST", -action=>$r->uri."/prob2"}); 17 print $self->hidden_authen_fields; 18 print input({-type=>"submit", -value=>"Do Problem 2"}); 19 print endform; 20 $self->bottom; 21 22 return OK; 23 } 24 25 1;
| aubreyja at gmail dot com | ViewVC Help |
| Powered by ViewVC 1.0.9 |