version 1.58, 2004/06/08 22:09:44
|
version 1.59, 2004/06/09 17:01:55
|
Line 628 ENDENHEAD
|
Line 628 ENDENHEAD
|
if (@affiliates > 0) { |
if (@affiliates > 0) { |
my @badclasses = (); |
my @badclasses = (); |
foreach my $class (@affiliates) { |
foreach my $class (@affiliates) { |
my $addcheck = &Apache::lonnet::auto_new_course($crsuhome,$class,$cenv{'internal.courseowner'}); |
my $addcheck = &Apache::lonnet::auto_new_course($crsunum,$crsudom,$class,$cenv{'internal.courseowner'}); |
unless ($addcheck eq 'ok') { |
unless ($addcheck eq 'ok') { |
push @badclasses, $class; |
push @badclasses, $class; |
} |
} |