--- loncom/lonnet/perl/lonnet.pm 2021/04/09 00:57:31 1.1445 +++ loncom/lonnet/perl/lonnet.pm 2021/04/09 02:01:11 1.1446 @@ -1,7 +1,7 @@ # The LearningOnline Network # TCP networking package # -# $Id: lonnet.pm,v 1.1445 2021/04/09 00:57:31 raeburn Exp $ +# $Id: lonnet.pm,v 1.1446 2021/04/09 02:01:11 raeburn Exp $ # # Copyright Michigan State University Board of Trustees # @@ -10278,10 +10278,9 @@ sub autoupdate_coowners { foreach my $xlist (split(',',$xlists)) { my ($inst_crosslist,$lcsec) = split(':',$xlist); $result = - &Apache::lonnet::auto_validate_inst_crosslist($cnum,$cdom,$instcode, - $inst_crosslist,$uname.':'.$udom); - last if ($result eq 'valid'); - } + &auto_validate_inst_crosslist($cnum,$cdom,$instcode, + $inst_crosslist,$uname.':'.$udom); + last if ($result eq 'valid'); } } }