diff options
author | Steve Hay <SteveHay@planit.com> | 2005-07-01 16:33:42 +0000 |
---|---|---|
committer | Steve Hay <SteveHay@planit.com> | 2005-07-01 16:33:42 +0000 |
commit | d2f9954da5cf024584e2642e8a40c50dd202ef16 (patch) | |
tree | 2ab3eea43ff3a2ae11692cd00c4f6e7a015c7d85 /lib/Archive | |
parent | fd617465265ed0cd97256c819ae8e3e4cde70989 (diff) | |
download | perl-d2f9954da5cf024584e2642e8a40c50dd202ef16.tar.gz |
Make Archive::Tar clean up its test files on Win32
(The old "can't delete an open file on Win32" chestnut again)
p4raw-id: //depot/perl@25043
Diffstat (limited to 'lib/Archive')
-rw-r--r-- | lib/Archive/Tar.pm | 2 | ||||
-rw-r--r-- | lib/Archive/Tar/t/02_methods.t | 1 |
2 files changed, 2 insertions, 1 deletions
diff --git a/lib/Archive/Tar.pm b/lib/Archive/Tar.pm index ecb6aba008..f8e817b2ae 100644 --- a/lib/Archive/Tar.pm +++ b/lib/Archive/Tar.pm @@ -14,7 +14,7 @@ use vars qw[$DEBUG $error $VERSION $WARN $FOLLOW_SYMLINK $CHOWN $CHMOD $DEBUG = 0; $WARN = 1; $FOLLOW_SYMLINK = 0; -$VERSION = "1.24_01"; +$VERSION = "1.24_02"; $CHOWN = 1; $CHMOD = 1; $DO_NOT_USE_PREFIX = 0; diff --git a/lib/Archive/Tar/t/02_methods.t b/lib/Archive/Tar/t/02_methods.t index 82f3777fd6..3721025d83 100644 --- a/lib/Archive/Tar/t/02_methods.t +++ b/lib/Archive/Tar/t/02_methods.t @@ -680,6 +680,7 @@ sub check_tar_extract { like( $content, qr/$econtent/, " Contents OK" ); + close $fh; unlink $path unless $NO_UNLINK; ### alternate extract path tests |