diff options
author | Craig A. Berry <craigberry@mac.com> | 2012-12-13 07:10:17 -0600 |
---|---|---|
committer | Craig A. Berry <craigberry@mac.com> | 2012-12-13 07:41:45 -0600 |
commit | a1031b54ebc2b462f22b6a16de6b6f52913da89a (patch) | |
tree | bab5171f48cb2d2025475ce8e52d817d4007c5e6 /ext/File-DosGlob | |
parent | 58b85e8b514ed66dd1005538ab07544406026290 (diff) | |
download | perl-a1031b54ebc2b462f22b6a16de6b6f52913da89a.tar.gz |
chdir's argument is a directory in DosGlob.t.
It probably doesn't matter anywhere but VMS, but on VMS,
disk:[dir.blead]t (the result of catfile) is an invalid argument to
chdir, but disk:[dir.blead.t] (the result of catdir) is correct.
Diffstat (limited to 'ext/File-DosGlob')
-rw-r--r-- | ext/File-DosGlob/t/DosGlob.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/File-DosGlob/t/DosGlob.t b/ext/File-DosGlob/t/DosGlob.t index edae75243a..b3e0043cfc 100644 --- a/ext/File-DosGlob/t/DosGlob.t +++ b/ext/File-DosGlob/t/DosGlob.t @@ -10,7 +10,7 @@ use File::DosGlob; use FindBin; use File::Spec::Functions; BEGIN { - chdir catfile $FindBin::Bin, (updir)x3, 't'; + chdir catdir $FindBin::Bin, (updir)x3, 't'; @INC = '../lib'; } |