diff options
author | Mark Wells <mark@freeside.biz> | 2015-08-31 13:32:13 -0700 |
---|---|---|
committer | Mark Wells <mark@freeside.biz> | 2015-08-31 14:19:57 -0700 |
commit | 34a368eae9db62d89a49e55d01c49c8c6f28f30e (patch) | |
tree | 7e1716eb0f704b10337edd290ea69e184e870607 /FS-Test/bin/freeside-test-fetch | |
parent | d20bfa4ce8103281e192e221020ec89a123875f6 (diff) |
change test utils to run from the source tree, #37340
Diffstat (limited to 'FS-Test/bin/freeside-test-fetch')
-rwxr-xr-x | FS-Test/bin/freeside-test-fetch | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/FS-Test/bin/freeside-test-fetch b/FS-Test/bin/freeside-test-fetch index ccc8528ff..953005704 100755 --- a/FS-Test/bin/freeside-test-fetch +++ b/FS-Test/bin/freeside-test-fetch @@ -1,8 +1,14 @@ #!/usr/bin/perl use strict; -use FS::Test; use Getopt::Std; +use File::Spec; + +my @dirs = File::Spec->splitdir(File::Spec->rel2abs(__FILE__)); +splice @dirs, -2; # bin/freeside-test-run +push @INC, File::Spec->catdir( @dirs, 'lib' ); +eval "use FS::Test;"; +die $@ if $@; my %opt; |