diff options
author | Daniel Stenberg <daniel@haxx.se> | 2004-02-12 14:40:08 +0000 |
---|---|---|
committer | Daniel Stenberg <daniel@haxx.se> | 2004-02-12 14:40:08 +0000 |
commit | 49ab1d914c0ae90f2c98f3433f4b27118b45835f (patch) | |
tree | c66bcd4753403af4b16a5e235b0dbd49c002d7e5 /tests/getpart.pm | |
parent | f9a6e7b68dc25c91cc3fdf63653a3bd431f1f48d (diff) | |
download | curl-49ab1d914c0ae90f2c98f3433f4b27118b45835f.tar.gz |
provide a source path to the servers to make them find the tests when run
outside the source dir, not needing any symlinks
Diffstat (limited to 'tests/getpart.pm')
-rw-r--r-- | tests/getpart.pm | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/tests/getpart.pm b/tests/getpart.pm index 6935f9eb7..9c74986f4 100644 --- a/tests/getpart.pm +++ b/tests/getpart.pm @@ -92,8 +92,15 @@ sub getpart { sub loadtest { my ($file)=@_; + my $dir; + $dir = $ENV{'srcdir'}; + if(!$dir) { + $dir="."; + } + + undef @xml; - open(XML, "<$file") || + open(XML, "<$dir/$file") || return 1; # failure! binmode XML; # for crapage systems, use binary while(<XML>) { |