diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-06-23 11:34:35 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-06-23 11:34:35 +0000 |
| commit | bd4c9092a0624678e0356f1c4645726583239e3e (patch) | |
| tree | 8692059156cc7c636c689ee3e86e58a39305ed1e | |
| parent | 7fde3c017402a0cac4379e08636f0987c91ed060 (diff) | |
| download | perl-bd4c9092a0624678e0356f1c4645726583239e3e.tar.gz | |
Add a pseudo-test to clean up data files for Archive::Tar tests
p4raw-id: //depot/perl@24956
| -rw-r--r-- | MANIFEST | 1 | ||||
| -rw-r--r-- | lib/Archive/Tar/t/99_clean.t | 9 |
2 files changed, 10 insertions, 0 deletions
@@ -1188,6 +1188,7 @@ lib/Archive/Tar/t/00_setup.t Archive::Tar test setup lib/Archive/Tar/t/01_use.t Archive::Tar tests lib/Archive/Tar/t/02_methods.t Archive::Tar tests lib/Archive/Tar/t/03_file.t Archive::Tar tests +lib/Archive/Tar/t/99_clean.t Archive::Tar test cleanup lib/Archive/Tar/t/src/long/b Archive::Tar tests lib/Archive/Tar/t/src/short/b Archive::Tar tests lib/Archive/Tar.pm Archive::Tar diff --git a/lib/Archive/Tar/t/99_clean.t b/lib/Archive/Tar/t/99_clean.t new file mode 100644 index 0000000000..a736f7438b --- /dev/null +++ b/lib/Archive/Tar/t/99_clean.t @@ -0,0 +1,9 @@ +#!perl + +BEGIN { + if ($ENV{PERL_CORE}) { + chdir '../lib/Archive/Tar/t/src' if -d '../lib/Archive/Tar/t/src'; + } +} + +unlink 'long/bar.tar', 'long/foo.tgz', 'short/bar.tar', 'short/foo.tgz'; |