Changeset 227f558 for fedkit

Timestamp:

Dec 1, 2008 6:09:10 PM (16 years ago)

Author:

Ted Faber <faber@…>

Branches:

axis_example, compt_changes, info-ops, master, version-1.30, version-2.00, version-3.01, version-3.02

Children:

77a7634

Parents:

12e6ca8

Message:

Another take on getting rid of startup flakiness

File:

• fedkit/fed-tun.pl (modified) (1 diff)

fedkit/fed-tun.pl

@@ -263 +263 @@
         open(SSHCMD, $cmd) 
            or die "Failed to run ssh";
-
-        my $check = <SSHCMD>;  # Make sure something ran...
+        # Wait for the other end to report its work done.  This string comes
+        # from the block below (after the elsif) -- tvf
+        my $check;  # Make sure something ran...
+
+        while ($check = <SSHCMD>) {
+            last if $check =~ /^Remote connection all/;
+        }
         print "Got line [$check] from remote side\n" if ($debug);