In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/3208277d2727f5e1b83117c8981f40c21a238b92?hp=277441df047f92a89eb3171fb2ad4cdb3c656355>
- Log ----------------------------------------------------------------- commit 3208277d2727f5e1b83117c8981f40c21a238b92 Author: Tony Cook <t...@develop-help.com> Date: Tue Dec 28 22:39:14 2010 +1100 close the produced test file so win32 can unlink it Previously runs would leave a GLOB(0x...) file in t/ ----------------------------------------------------------------------- Summary of changes: t/io/open.t | 1 + 1 files changed, 1 insertions(+), 0 deletions(-) diff --git a/t/io/open.t b/t/io/open.t index 5a8f008..3548d9b 100644 --- a/t/io/open.t +++ b/t/io/open.t @@ -333,6 +333,7 @@ fresh_perl_is( print $fh "hello"; "".*STDOUT; print "ok"; + close $fh; unlink \*STDOUT; ', 'ok', { stderr => 1 }, -- Perl5 Master Repository