* tests/scripts/features/reinvoke: [SV 62088] Close STDIN

On Windows we can't delete open files, so close STDIN before
removing the temporary input file.

diff --git a/tests/scripts/features/reinvoke b/tests/scripts/features/reinvoke
index 5bcc40b47e4cc2866a659a2a4eee394dbbce5d71..07cbbfbe9108d1568269729205cf640aa6e0b1ef 100644 (file)
--- a/tests/scripts/features/reinvoke
+++ b/tests/scripts/features/reinvoke
@@ -173,6 +173,7 @@ open(STDIN, "<", 'input.mk') || die "input.mk: $!\n";
 
 run_make_test('', '-sf -', "all\n");
 
+close(STDIN);
 unlink('input.mk');
 
 # This tells the test driver that the perl test script executed properly.