summaryrefslogtreecommitdiff
path: root/t/io
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2011-02-24 10:06:35 +0000
committerNicholas Clark <nick@ccl4.org>2011-03-06 09:13:49 +0000
commit519ecd2cabd84d9e11d438f376f05f932f9bc5cc (patch)
tree4959880c5373beefa6be573ecf8e4e967176da34 /t/io
parent0e25fa04f6006646c337dfe00daeec3d9906506f (diff)
downloadperl-519ecd2cabd84d9e11d438f376f05f932f9bc5cc.tar.gz
In t/ avoid using File::Spec for paths only used by Perl.
All platforms Perl builds on can already support Unix-style paths (given that make_ext.pl is using them). This makes 7 more tests pass under minitest, which doesn't build File::Spec, because it's part of an XS module.
Diffstat (limited to 't/io')
-rw-r--r--t/io/fs.t3
1 files changed, 1 insertions, 2 deletions
diff --git a/t/io/fs.t b/t/io/fs.t
index 64fcc5b622..1cdddec9a3 100644
--- a/t/io/fs.t
+++ b/t/io/fs.t
@@ -7,7 +7,6 @@ BEGIN {
}
use Config;
-use File::Spec::Functions;
my $Is_VMSish = ($^O eq 'VMS');
@@ -66,7 +65,7 @@ else {
`rm -f $tmpdir 2>/dev/null; mkdir $tmpdir 2>/dev/null`;
}
-chdir catdir(curdir(), $tmpdir);
+chdir $tmpdir;
`/bin/rm -rf a b c x` if -x '/bin/rm';