| … | |
… | |
| 226 | last; |
226 | last; |
| 227 | } |
227 | } |
| 228 | } |
228 | } |
| 229 | # Otherwise, create a new global problem for each of the files selected |
229 | # Otherwise, create a new global problem for each of the files selected |
| 230 | unless ($dirFound) { |
230 | unless ($dirFound) { |
| 231 | warn "one wasn't. adding problems selected at level $count\n"; |
|
|
| 232 | foreach my $selected (@selected) { |
231 | foreach my $selected (@selected) { |
| 233 | my $file = join "/", @path, $selected; |
232 | my $file = join "/", @path, $selected; |
| 234 | my $problemRecord = new WeBWorK::DB::Record::Problem; |
233 | my $problemRecord = new WeBWorK::DB::Record::Problem; |
| 235 | $problemRecord->problem_id($freeProblemID++); |
234 | $problemRecord->problem_id($freeProblemID++); |
| 236 | $problemRecord->set_id($setName); |
235 | $problemRecord->set_id($setName); |
Parent Directory
| 
Revision Log
| 
Patch