--- loncom/enrollment/Enrollment.pm	2019/08/25 02:43:09	1.54
+++ loncom/enrollment/Enrollment.pm	2021/10/08 18:49:17	1.56
@@ -1,5 +1,5 @@
 # Automated Enrollment manager
-# $Id: Enrollment.pm,v 1.54 2019/08/25 02:43:09 raeburn Exp $
+# $Id: Enrollment.pm,v 1.56 2021/10/08 18:49:17 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -25,6 +25,7 @@
 #
 package LONCAPA::Enrollment;
 
+use lib '/home/httpd/lib/perl';
 use Apache::loncoursedata;
 use Apache::lonnet;
 use Apache::loncommon();
@@ -35,7 +36,6 @@ use HTML::Parser;
 use LONCAPA::Configuration;
 use Math::Random;
 use Time::Local;
-use lib '/home/httpd/lib/perl';
 
 use strict;
 
@@ -331,7 +331,7 @@ sub update_LC {
                     }
                 }
 # Check for institutional section change
-                if (($$currlist{$uname}[$instidx] ne $instsec) && (!$added)) {
+                if (($$currlist{$uname}[$instidx] ne $instsec) && (!$added) && ($$currlist{$uname}[$type] eq "auto")) {
                     my $modify_instsec_result =
                         &Apache::lonnet::modify_student_enrollment($dom,$uname,undef,undef,undef,undef,undef,$stuinfo[ $place{groupID} ],$enddate,$startdate,'auto','',$cid,'',$context,$credits,$instsec);
                     if ($modify_instsec_result =~ /^ok/) {