Francois Gouget : winetest/build-patterns: Use while to read from file descriptors.

[Alexandre Julliard]

Module: tools
Branch: master
Commit: dfffdd720f2a786c5b61d67b8bc06527b75f6a8c
URL:    https://source.winehq.org/git/tools.git/?a=commit;h=dfffdd720f2a786c5b61d67b8bc06527b75f6a8c

Author: Francois Gouget <fgouget at codeweavers.com>
Date:   Mon May 17 10:23:10 2021 +0200

winetest/build-patterns: Use while to read from file descriptors.

Signed-off-by: Francois Gouget <fgouget at codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard at winehq.org>

---

 winetest/build-patterns | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/winetest/build-patterns b/winetest/build-patterns
index 06d527f..e6bdf97 100755
--- a/winetest/build-patterns
+++ b/winetest/build-patterns
@@ -674,7 +674,7 @@ if (open(my $fh, "-|", $cmd))
 {
     my $index = 0;
     my ($commit, $build);
-    foreach my $line (<$fh>)
+    while (my $line = <$fh>)
     {
         chomp $line;
         if ($line =~ /^([0-9a-f]{40}) (.*)$/)