From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Tue, 9 Apr 2002 11:51:36 +0000 (+0000)
Subject: Portability tweak.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=86dc4f0369f60d4d1fe21ab8a3a480faa427ac6c;p=p5sagit%2Fp5-mst-13.2.git

Portability tweak.

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

diff --git a/lib/File/CheckTree.t b/lib/File/CheckTree.t
index 58cca3a..ae5a311 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 ####