diff options
Diffstat (limited to 't/lib/1_compile.t')
| -rw-r--r-- | t/lib/1_compile.t | 8 |
1 files changed, 1 insertions, 7 deletions
diff --git a/t/lib/1_compile.t b/t/lib/1_compile.t index af2c1687c6..51d4d6ae71 100644 --- a/t/lib/1_compile.t +++ b/t/lib/1_compile.t @@ -1,13 +1,7 @@ #!./perl BEGIN { - if (-d '../pod' && -d '../t') { - require File::Spec; - my ($v,$d,$f) = File::Spec->splitpath($^X); - $^X = File::Spec->catfile(File::Spec->curdir, $f) - if $^X eq File::Spec->catfile(File::Spec->updir, $f); - chdir '..'; - } + chdir '..' if -d '../pod' && -d '../t'; @INC = 'lib'; } |