[LON-CAPA-cvs] cvs: loncom /automation batchcreatecourse.pm
raeburn
raeburn@source.lon-capa.org
Mon, 24 May 2010 06:32:38 -0000
raeburn Mon May 24 06:32:38 2010 EDT
Modified files:
/loncom/automation batchcreatecourse.pm
Log:
- A syllabus doesn't make sense for a Community.
Index: loncom/automation/batchcreatecourse.pm
diff -u loncom/automation/batchcreatecourse.pm:1.35 loncom/automation/batchcreatecourse.pm:1.36
--- loncom/automation/batchcreatecourse.pm:1.35 Sat Jan 30 22:16:50 2010
+++ loncom/automation/batchcreatecourse.pm Mon May 24 06:32:38 2010
@@ -1,5 +1,5 @@
#
-# $Id: batchcreatecourse.pm,v 1.35 2010/01/30 22:16:50 bisitz Exp $
+# $Id: batchcreatecourse.pm,v 1.36 2010/05/24 06:32:38 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -434,7 +434,11 @@
}
my $firstres = $details->{'firstres'};
if ($firstres eq '') {
- $firstres = 'syl';
+ if ($crstype eq 'Community') {
+ $firstres = 'nav';
+ } else {
+ $firstres = 'syl';
+ }
}
foreach my $secid (sort(keys(%{$details->{'sections'}}))) {
$sectionstr .= $details->{'sections'}{$secid}{'inst'}.':'.$details->{'sections'}{$secid}{'loncapa'}.',';