X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FTest%2FSimple%2Ft%2Foutput.t;h=69682e47aea070336b3320883224b8300a043add;hb=b8d190ff31df6d51464475a3b67820d11d6c9f06;hp=ef89a0705b3f20e513755618ee62641d6f4c3e78;hpb=5fa2bf2b4e1a80d186eead35427699f788f3dea2;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/lib/Test/Simple/t/output.t b/lib/Test/Simple/t/output.t
index ef89a07..69682e4 100644
--- a/lib/Test/Simple/t/output.t
+++ b/lib/Test/Simple/t/output.t
@@ -35,7 +35,7 @@ close *$out;
 undef $out;
 open(IN, 'foo') or die $!;
 chomp(my $line = <IN>);
-
+close IN;
 ok($line eq 'hi!');
 
 open(FOO, ">>foo") or die $!;