--- loncom/lonnet/perl/lonnet.pm	2010/06/25 04:37:54	1.1071
+++ loncom/lonnet/perl/lonnet.pm	2010/07/06 18:36:56	1.1072
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # TCP networking package
 #
-# $Id: lonnet.pm,v 1.1071 2010/06/25 04:37:54 raeburn Exp $
+# $Id: lonnet.pm,v 1.1072 2010/07/06 18:36:56 www Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -710,7 +710,7 @@ sub compare_server_load {
     my $userloadans = &reply('userload',$try_server);
 
     if ($loadans !~ /\d/ && $userloadans !~ /\d/) {
-	next; #didn't get a number from the server
+	return; #didn't get a number from the server
     }
 
     my $load;