version 1.58, 2011/01/11 22:09:49
|
version 1.59, 2011/01/15 18:24:16
|
Line 845 sub modify_course {
|
Line 845 sub modify_course {
|
push(@warnings,&mt('There is no owner associated with this LON-CAPA course.'). |
push(@warnings,&mt('There is no owner associated with this LON-CAPA course.'). |
'<br />'.&mt('If automated enrollment at your institution requires validation of course owners, automated enrollment will fail.')); |
'<br />'.&mt('If automated enrollment at your institution requires validation of course owners, automated enrollment will fail.')); |
} else { |
} else { |
|
my %crsenv = &Apache::lonnet::get('environment',['internal.co-owners'],$cdom,$cnum); |
|
my $coowners = $crsenv{'internal.co-owners'}; |
if (@sections > 0) { |
if (@sections > 0) { |
if ($changed{'code'}) { |
if ($changed{'code'}) { |
my %crsenv = &Apache::lonnet::get('environment',['internal.co-owners'],$cdom,$cnum); |
|
my $coowners = $crsenv{'internal.co-owners'}; |
|
foreach my $sec (@sections) { |
foreach my $sec (@sections) { |
if ($sec =~ m/^(.+):/) { |
if ($sec =~ m/^(.+):/) { |
my $instsec = $1; |
my $instsec = $1; |