diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-04-09 11:51:36 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-04-09 11:51:36 +0000 |
| commit | 86dc4f0369f60d4d1fe21ab8a3a480faa427ac6c (patch) | |
| tree | d8c7e559ca719e8e8c46fea1ac9bf4a94ff90b4d /lib | |
| parent | 52b65635cf3a0c4f6c8d73bf10338bb756cd90b4 (diff) | |
| download | perl-86dc4f0369f60d4d1fe21ab8a3a480faa427ac6c.tar.gz | |
Portability tweak.
p4raw-id: //depot/perl@15825
Diffstat (limited to 'lib')
| -rwxr-xr-x | lib/File/CheckTree.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/File/CheckTree.t b/lib/File/CheckTree.t index 58cca3a395..ae5a311757 100755 --- a/lib/File/CheckTree.t +++ b/lib/File/CheckTree.t @@ -18,7 +18,7 @@ use File::Spec; # used to get absolute paths # Will move up one level to make it easier to generate # reliable pathnames for testing File::CheckTree -chdir('..') or die "cannot change to parent of t/ directory: $!"; +chdir(File::Spec->updir) or die "cannot change to parent of t/ directory: $!"; #### TEST 1 -- No warnings #### |