[system] / branches / rel-2-2-dev / webwork2 / lib / WeBWorK / ContentGenerator / ProblemSets.pm Repository:
ViewVC logotype

Diff of /branches/rel-2-2-dev/webwork2/lib/WeBWorK/ContentGenerator/ProblemSets.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

Revision 639 Revision 640
… …
55 my $r = $self->{r}; 55 my $r = $self->{r};
56 my $courseEnvironment = $self->{courseEnvironment}; 56 my $courseEnvironment = $self->{courseEnvironment};
57 my $user = $r->param('user'); 57 my $user = $r->param('user');
58 my $wwdb = $self->{wwdb}; 58 my $wwdb = $self->{wwdb};
59 59
60 print CGI::startform(-method=>"POST", -action=>$r->uri."/hardcopy"); 60 print CGI::startform(-method=>"POST", -action=>$r->uri."hardcopy/");
61 print $self->hidden_authen_fields;
61 print CGI::start_table(); 62 print CGI::start_table();
62 print CGI::Tr( 63 print CGI::Tr(
63 CGI::th("Sel."), 64 CGI::th("Sel."),
64 CGI::th("Name"), 65 CGI::th("Name"),
65 CGI::th("Status"), 66 CGI::th("Status"),
… …
71 foreach my $set (sort { $a->open_date <=> $b->open_date } @sets) { 72 foreach my $set (sort { $a->open_date <=> $b->open_date } @sets) {
72 print $self->setListRow($set); 73 print $self->setListRow($set);
73 } 74 }
74 75
75 print CGI::end_table(); 76 print CGI::end_table();
76 print $self->hidden_authen_fields;
77 print CGI::p(CGI::submit("hardcopy", "Download Harcopy for Selected Sets")); 77 print CGI::p(CGI::submit("hardcopy", "Download Harcopy for Selected Sets"));
78 print CGI::endform(); 78 print CGI::endform();
79 79
80 return ""; 80 return "";
81} 81}
Legend:
Removed from v.639  
changed lines
  Added in v.640
aubreyja at gmail dot com
 ViewVC Help
Powered by ViewVC 1.0.9