loncom/enrollment/localenroll.pm - diff

Return to localenroll.pm CVS log

Up to [LON-CAPA] / loncom / enrollment

version 1.58, 2018/02/01 04:51:08	version 1.59, 2018/06/14 04:11:49
Line 621 sub check_instclasses {	Line 621 sub check_instclasses {
my ($owners,$dom,$classes,$validated) = @_;	my ($owners,$dom,$classes,$validated) = @_;
if ((ref($classes) eq 'HASH') && (ref($validated) eq 'HASH')) {	if ((ref($classes) eq 'HASH') && (ref($validated) eq 'HASH')) {
foreach my $class (keys(%{$classes})){	foreach my $class (keys(%{$classes})){
if (&check_section($class,$owners,$cdom) eq 'ok') {	if (&check_section($class,$owners,$dom) eq 'ok') {
$validated->{$class} = 1;	$validated->{$class} = 1;
}	}
}	}