![[BACK]](/icons/back.gif){kind=icon}
Return to batchcreatecourse.pm CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom / automation|
Return to batchcreatecourse.pm CVS log | Up to [LON-CAPA] / loncom / automation |
| version 1.24, 2007/09/03 15:34:16 | version 1.25, 2008/02/07 01:43:21 |
|---|---|
| Line 219 sub create_courses { | Line 219 sub create_courses { |
| &parse_coursereqs($newcoursedir.'/'.$request, \%details); | &parse_coursereqs($newcoursedir.'/'.$request, \%details); |
| foreach my $num (sort keys %details) { | foreach my $num (sort keys %details) { |
| my $courseid = &build_course($dom,$num,$context,\%details,\%longroles,\$logmsg,\$newusermsg,\$addresult,\%enrollcount,\$output,\$keysmsg); | my $courseid = &build_course($dom,$num,$context,\%details,\%longroles,\$logmsg,\$newusermsg,\$addresult,\%enrollcount,\$output,\$keysmsg); |
| if ($courseid =~ /^$match_courseid$/) { | if ($courseid =~m{^/$match_domain/$match_courseid}) { |
| $$courseids{$courseid} = $details{$num}{'class'}; | $$courseids{$courseid} = $details{$num}{'class'}; |
| } | } |
| } | } |