[LON-CAPA-cvs] cvs: loncom(version_2_11_X) /lonnet/perl lonnet.pm

[raeburn]

raeburn		Sat May 13 13:58:50 2017 EDT

  Modified files:              (Branch: version_2_11_X)
    /loncom/lonnet/perl	lonnet.pm 
  Log:
  - For 2.11
    - Fix typo in 1.1172.2.79 backport of 1.1317.
  
  
Index: loncom/lonnet/perl/lonnet.pm
diff -u loncom/lonnet/perl/lonnet.pm:1.1172.2.92 loncom/lonnet/perl/lonnet.pm:1.1172.2.93
--- loncom/lonnet/perl/lonnet.pm:1.1172.2.92	Sun Mar 26 23:53:30 2017
+++ loncom/lonnet/perl/lonnet.pm	Sat May 13 13:58:49 2017
@@ -1,7 +1,7 @@
 # The LearningOnline Network
 # TCP networking package
 #
-# $Id: lonnet.pm,v 1.1172.2.92 2017/03/26 23:53:30 raeburn Exp $
+# $Id: lonnet.pm,v 1.1172.2.93 2017/05/13 13:58:49 raeburn Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -8085,7 +8085,7 @@
         &logthis('fetch_enrollment_query: invalid queryid: '.$queryid.' for host: '.$host.' and homeserver: '.$homeserver.' context: '.$context.' '.$cnum); 
         return 'error: '.$queryid;
     }
-    my $reply = &get_query_reply($queryid,$sleep.$loopmax);
+    my $reply = &get_query_reply($queryid,$sleep,$loopmax);
     my $tries = 1;
     while (($reply=~/^timeout/) && ($tries < $maxtries)) {
         $reply = &get_query_reply($queryid,$sleep,$loopmax);