loncom/automation/batchcreatecourse.pm - diff

Return to batchcreatecourse.pm CVS log

Up to [LON-CAPA] / loncom / automation

version 1.35.4.1, 2010/02/26 23:50:28	version 1.36, 2010/05/24 06:32:38
Line 434 sub build_course {	Line 434 sub build_course {
}	}
my $firstres = $details->{'firstres'};	my $firstres = $details->{'firstres'};
if ($firstres eq '') {	if ($firstres eq '') {
$firstres = 'syl';	if ($crstype eq 'Community') {
	$firstres = 'nav';
	} else {
	$firstres = 'syl';
	}
}	}
foreach my $secid (sort(keys(%{$details->{'sections'}}))) {	foreach my $secid (sort(keys(%{$details->{'sections'}}))) {
$sectionstr .= $details->{'sections'}{$secid}{'inst'}.':'.$details->{'sections'}{$secid}{'loncapa'}.',';	$sectionstr .= $details->{'sections'}{$secid}{'inst'}.':'.$details->{'sections'}{$secid}{'loncapa'}.',';
Line 493 sub build_course {	Line 497 sub build_course {
crsquota => $details->{'crsquota'},	crsquota => $details->{'crsquota'},
clonecourse => $details->{'clonecrs'},	clonecourse => $details->{'clonecrs'},
clonedomain => $details->{'clonedom'},	clonedomain => $details->{'clonedom'},
cloneroster => $details->{'cloneroster'},
datemode => $details->{'datemode'},	datemode => $details->{'datemode'},
dateshift => $details->{'dateshift'},	dateshift => $details->{'dateshift'},
crsid => $details->{'optional_id'},	crsid => $details->{'optional_id'},