X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=FS-Test%2Fbin%2Ffreeside-test-fetch;h=953005704d99f199ec05b448d16c2c02580d8425;hb=HEAD;hp=ccc8528ffe809d5ed643bfac4341ad411d08e487;hpb=4b616a57791fd6fb324194a0eb96a8f95826c533;p=freeside.git

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;