| … | |
… | |
| 28 | use WeBWorK::ContentGenerator::Instructor::ProblemSetList; |
28 | use WeBWorK::ContentGenerator::Instructor::ProblemSetList; |
| 29 | use WeBWorK::ContentGenerator::Instructor::UserList; |
29 | use WeBWorK::ContentGenerator::Instructor::UserList; |
| 30 | use WeBWorK::ContentGenerator::Instructor::SendMail; |
30 | use WeBWorK::ContentGenerator::Instructor::SendMail; |
| 31 | use WeBWorK::ContentGenerator::Instructor::ShowAnswers; |
31 | use WeBWorK::ContentGenerator::Instructor::ShowAnswers; |
| 32 | use WeBWorK::ContentGenerator::Instructor::Scoring; |
32 | use WeBWorK::ContentGenerator::Instructor::Scoring; |
|
|
33 | use WeBWorK::ContentGenerator::Instructor::Stats; |
| 33 | use WeBWorK::ContentGenerator::Login; |
34 | use WeBWorK::ContentGenerator::Login; |
| 34 | use WeBWorK::ContentGenerator::Logout; |
35 | use WeBWorK::ContentGenerator::Logout; |
| 35 | use WeBWorK::ContentGenerator::Options; |
36 | use WeBWorK::ContentGenerator::Options; |
| 36 | use WeBWorK::ContentGenerator::Problem; |
37 | use WeBWorK::ContentGenerator::Problem; |
| 37 | use WeBWorK::ContentGenerator::ProblemSet; |
38 | use WeBWorK::ContentGenerator::ProblemSet; |
| … | |
… | |
| 164 | $result = WeBWorK::ContentGenerator::Instructor::PGProblemEditor->new($r, $ce, $db)->go(@components); |
165 | $result = WeBWorK::ContentGenerator::Instructor::PGProblemEditor->new($r, $ce, $db)->go(@components); |
| 165 | } elsif ($instructorArgument eq "send_mail") { |
166 | } elsif ($instructorArgument eq "send_mail") { |
| 166 | $result = WeBWorK::ContentGenerator::Instructor::SendMail->new($r, $ce, $db)->go(@components); |
167 | $result = WeBWorK::ContentGenerator::Instructor::SendMail->new($r, $ce, $db)->go(@components); |
| 167 | } elsif ($instructorArgument eq "show_answers") { |
168 | } elsif ($instructorArgument eq "show_answers") { |
| 168 | $result = WeBWorK::ContentGenerator::Instructor::ShowAnswers->new($r, $ce, $db)->go(@components); |
169 | $result = WeBWorK::ContentGenerator::Instructor::ShowAnswers->new($r, $ce, $db)->go(@components); |
|
|
170 | } elsif ($instructorArgument eq "stats") { |
|
|
171 | $result = WeBWorK::ContentGenerator::Instructor::Stats->new($r, $ce, $db)->go(@components); |
| 169 | } |
172 | } |
| 170 | } elsif ($arg eq "options") { |
173 | } elsif ($arg eq "options") { |
| 171 | $result = WeBWorK::ContentGenerator::Options->new($r, $ce, $db)->go; |
174 | $result = WeBWorK::ContentGenerator::Options->new($r, $ce, $db)->go; |
| 172 | } elsif ($arg eq "feedback") { |
175 | } elsif ($arg eq "feedback") { |
| 173 | $result = WeBWorK::ContentGenerator::Feedback->new($r, $ce, $db)->go; |
176 | $result = WeBWorK::ContentGenerator::Feedback->new($r, $ce, $db)->go; |