diff options
| author | Steve Hay <SteveHay@planit.com> | 2006-03-08 12:15:04 +0000 |
|---|---|---|
| committer | Steve Hay <SteveHay@planit.com> | 2006-03-08 12:15:04 +0000 |
| commit | d78ab5f9045cb396355b3b32d61ebf3af1aa2028 (patch) | |
| tree | ef28ae0429b0eaac5277a1cd7b6255ffbb59abc0 /lib/Archive | |
| parent | f86ea535d32a65363bd92042b52c18214b181403 (diff) | |
| download | perl-d78ab5f9045cb396355b3b32d61ebf3af1aa2028.tar.gz | |
Cleanup Archive-Tar temporary test files
I've done this twice before already (changes #25043 and #26785),
but it keeps getting accidentally removed. Third time lucky?
p4raw-link: @25043 on //depot/perl: d2f9954da5cf024584e2642e8a40c50dd202ef16
p4raw-id: //depot/perl@27416
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 536336abc3..2b4a512c00 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.29"; +$VERSION = "1.29_01"; $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 a5d7617053..c717a8fea9 100644 --- a/lib/Archive/Tar/t/02_methods.t +++ b/lib/Archive/Tar/t/02_methods.t @@ -706,6 +706,7 @@ sub check_tar_extract { like( $content, qr/$econtent/, " Contents OK" ); + close $fh; $NO_UNLINK or 1 while unlink $path; ### alternate extract path tests |