--- loncom/lonnet/perl/lonnet.pm	2021/03/31 02:19:59	1.1444
+++ 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.1444 2021/03/31 02:19:59 raeburn Exp $
+# $Id: lonnet.pm,v 1.1446 2021/04/09 02:01:11 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -9441,7 +9441,7 @@ sub auto_validate_inst_crosslist {
     unless (($homeserver eq '') || ($homeserver eq 'no_host')) {
         $response=&reply('autovalidateinstcrosslist:'.$cdom.':'.
                          &escape($instcode).':'.&escape($inst_xlist).':'.
-                         &escape($coowner),$homeserver)));
+                         &escape($coowner),$homeserver);
     }
     return $response;
 }
@@ -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');
                                 }
                             }
                         }