[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'}.',';