summaryrefslogtreecommitdiff
path: root/tests/getpart.pm
diff options
context:
space:
mode:
authorDaniel Stenberg <daniel@haxx.se>2004-02-12 14:40:08 +0000
committerDaniel Stenberg <daniel@haxx.se>2004-02-12 14:40:08 +0000
commit49ab1d914c0ae90f2c98f3433f4b27118b45835f (patch)
treec66bcd4753403af4b16a5e235b0dbd49c002d7e5 /tests/getpart.pm
parentf9a6e7b68dc25c91cc3fdf63653a3bd431f1f48d (diff)
downloadcurl-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.pm9
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>) {