| … | |
… | |
| 26 | use WeBWorK::ContentGenerator::Instructor::ProblemList; |
26 | use WeBWorK::ContentGenerator::Instructor::ProblemList; |
| 27 | use WeBWorK::ContentGenerator::Instructor::ProblemSetEditor; |
27 | use WeBWorK::ContentGenerator::Instructor::ProblemSetEditor; |
| 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::Login; |
32 | use WeBWorK::ContentGenerator::Login; |
| 32 | use WeBWorK::ContentGenerator::Logout; |
33 | use WeBWorK::ContentGenerator::Logout; |
| 33 | use WeBWorK::ContentGenerator::Options; |
34 | use WeBWorK::ContentGenerator::Options; |
| 34 | use WeBWorK::ContentGenerator::Problem; |
35 | use WeBWorK::ContentGenerator::Problem; |
| 35 | use WeBWorK::ContentGenerator::ProblemSet; |
36 | use WeBWorK::ContentGenerator::ProblemSet; |
| … | |
… | |
| 158 | } |
159 | } |
| 159 | } elsif ($instructorArgument eq "pgProblemEditor") { |
160 | } elsif ($instructorArgument eq "pgProblemEditor") { |
| 160 | $result = WeBWorK::ContentGenerator::Instructor::PGProblemEditor->new($r, $ce, $db)->go(@components); |
161 | $result = WeBWorK::ContentGenerator::Instructor::PGProblemEditor->new($r, $ce, $db)->go(@components); |
| 161 | } elsif ($instructorArgument eq "send_mail") { |
162 | } elsif ($instructorArgument eq "send_mail") { |
| 162 | $result = WeBWorK::ContentGenerator::Instructor::SendMail->new($r, $ce, $db)->go(@components); |
163 | $result = WeBWorK::ContentGenerator::Instructor::SendMail->new($r, $ce, $db)->go(@components); |
|
|
164 | } elsif ($instructorArgument eq "show_answers") { |
|
|
165 | $result = WeBWorK::ContentGenerator::Instructor::ShowAnswers->new($r, $ce, $db)->go(@components); |
| 163 | } |
166 | } |
| 164 | } elsif ($arg eq "options") { |
167 | } elsif ($arg eq "options") { |
| 165 | $result = WeBWorK::ContentGenerator::Options->new($r, $ce, $db)->go; |
168 | $result = WeBWorK::ContentGenerator::Options->new($r, $ce, $db)->go; |
| 166 | } elsif ($arg eq "feedback") { |
169 | } elsif ($arg eq "feedback") { |
| 167 | $result = WeBWorK::ContentGenerator::Feedback->new($r, $ce, $db)->go; |
170 | $result = WeBWorK::ContentGenerator::Feedback->new($r, $ce, $db)->go; |