From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Fri, 2 Sep 2005 16:45:31 +0000 (+0000)
Subject: Once again, fix Archive::Tar setup test with -Dmksymlinks
X-Git-Tag: perl-5.9.3~1227
X-Git-Url: https://perl5.git.perl.org/perl5.git/commitdiff_plain/a17a2ffa9436a5f6ee4bae05b5467ad019c274ad?ds=sidebyside

Once again, fix Archive::Tar setup test with -Dmksymlinks

p4raw-id: //depot/perl@25349
---

diff --git a/lib/Archive/Tar/t/00_setup.t b/lib/Archive/Tar/t/00_setup.t
index 888687e..f6734c5 100644
--- a/lib/Archive/Tar/t/00_setup.t
+++ b/lib/Archive/Tar/t/00_setup.t
@@ -8,6 +8,7 @@ BEGIN {
 }
 
 for my $d (qw(short long)) {
+    -d $d or mkdir $d;
     my $file = File::Spec->catfile($d,'b');
     open F, '>', $file or die "Can't create $file: $!\n";
     print F "bbbbbbbbbbb\n";