--- loncom/interface/loncreatecourse.pm 2004/06/08 22:09:44 1.58 +++ loncom/interface/loncreatecourse.pm 2004/06/09 17:01:55 1.59 @@ -1,7 +1,7 @@ #meserver The LearningOnline Network # Create a course # -# $Id: loncreatecourse.pm,v 1.58 2004/06/08 22:09:44 raeburn Exp $ +# $Id: loncreatecourse.pm,v 1.59 2004/06/09 17:01:55 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -628,7 +628,7 @@ ENDENHEAD if (@affiliates > 0) { my @badclasses = (); 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') { push @badclasses, $class; }