--- loncom/enrollment/Enrollment.pm 2014/06/23 00:56:02 1.47 +++ loncom/enrollment/Enrollment.pm 2016/06/03 01:22:36 1.48 @@ -1,5 +1,5 @@ # Automated Enrollment manager -# $Id: Enrollment.pm,v 1.47 2014/06/23 00:56:02 raeburn Exp $ +# $Id: Enrollment.pm,v 1.48 2016/06/03 01:22:36 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -197,9 +197,11 @@ sub update_LC { } } -# Explicitly allow access to creation/modification of students if called as an automated process. +# Explicitly allow access to creation/modification of students and group membership changes +# when called as an automated process. if ($context eq 'automated') { $env{'allowed.cst'}='F'; + $env{'allowed.mdg'}='F'; } # Compare IDs with existing LON-CAPA enrollment for this class @@ -446,9 +448,11 @@ sub update_LC { } } -# Terminated explictly allowed access to student creation/modification +# Terminated explictly allowed access to student creation/modification +# and group membership changes if ($context eq 'automated') { delete($env{'allowed.cst'}); + delete($env{'allowed.mdg'}); } if ($enrollcount > 0) { if ($context eq "updatenow") {