[LON-CAPA-cvs] cvs: loncom(version_2_11_X) /interface lonmodifycourse.pm

[raeburn]

raeburn		Sun Aug  7 01:32:52 2016 EDT

  Modified files:              (Branch: version_2_11_X)
    /loncom/interface	lonmodifycourse.pm 
  Log:
  - For 2.11
    - Backport 1.84
  
  
Index: loncom/interface/lonmodifycourse.pm
diff -u loncom/interface/lonmodifycourse.pm:1.79 loncom/interface/lonmodifycourse.pm:1.79.2.1
--- loncom/interface/lonmodifycourse.pm:1.79	Tue Mar 29 14:05:10 2016
+++ loncom/interface/lonmodifycourse.pm	Sun Aug  7 01:32:52 2016
@@ -1,7 +1,7 @@
 # The LearningOnline Network with CAPA
 # handler for DC-only modifiable course settings
 #
-# $Id: lonmodifycourse.pm,v 1.79 2016/03/29 14:05:10 raeburn Exp $
+# $Id: lonmodifycourse.pm,v 1.79.2.1 2016/08/07 01:32:52 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -55,7 +55,7 @@
 sub autoenroll_keys {
     my $internals = ['coursecode','courseowner','authtype','autharg','defaultcredits',
                      'autoadds','autodrops','autostart','autoend','sectionnums',
-                     'crosslistings','co-owners'];
+                     'crosslistings','co-owners','autodropfailsafe'];
     my $accessdates = ['default_enrollment_start_date','default_enrollment_end_date'];
     return ($internals,$accessdates);
 }
@@ -117,14 +117,13 @@
                 $enrollvar{$type} =~ s/,/, /g;
             } elsif ($type eq "authtype"
                      || $type eq "autharg"    || $type eq "coursecode"
-                     || $type eq "crosslistings") {
+                     || $type eq "crosslistings" || $type eq "selfenrollmgr"
++                    || $type eq "autodropfailsafe") {
                 $enrollvar{$type} = $settings{$item};
             } elsif ($type eq 'defaultcredits') {
                 if (&showcredits($cdom)) {
                     $enrollvar{$type} = $settings{$item};
                 }
-            } elsif ($type eq 'selfenrollmgr') {
-                $enrollvar{$type} = $settings{$item};    
             } elsif ($type eq 'courseowner') {
                 if ($settings{$item} =~ /^[^:]+:[^:]+$/) {
                     $enrollvar{$type} = $settings{$item};
@@ -2113,6 +2112,7 @@
                       'sectionnums' => 'Course section number:LON-CAPA section',
                       'crosslistings' => 'Crosslisted class:LON-CAPA section',
                       'defaultcredits' => 'Credits',
+                      'autodropfailsafe' => "Failsafe section enrollment count",
                       'selfenrollmgrdc'  => "Course-specific self-enrollment configuration by Domain Coordinator",
                       'selfenrollmgrcc'  => "Course-specific self-enrollment configuration by Course personnel",