From: minima <minima>
Date: Tue, 15 Oct 2002 13:04:48 +0000 (+0000)
Subject: sort the include paths out
X-Git-Tag: PRE-1-52~139
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=41e0fd6ea6aea6950255f3671c6e8c5c6f71fded;p=spider.git

sort the include paths out
---

diff --git a/perl/create_usdb.pl b/perl/create_usdb.pl
index 575babc7..f7242cf7 100755
--- a/perl/create_usdb.pl
+++ b/perl/create_usdb.pl
@@ -16,6 +16,7 @@ BEGIN {
 	$root = "/spider"; 
 	$root = $ENV{'DXSPIDER_ROOT'} if $ENV{'DXSPIDER_ROOT'};
 
+	unshift @INC, "$root/perl";	# this IS the right way round!
 	unshift @INC, "$root/local";
 }
 
diff --git a/perl/gen_usdb_data.pl b/perl/gen_usdb_data.pl
index 71101bec..edd74dab 100755
--- a/perl/gen_usdb_data.pl
+++ b/perl/gen_usdb_data.pl
@@ -36,6 +36,7 @@ BEGIN {
 	$root = "/spider"; 
 	$root = $ENV{'DXSPIDER_ROOT'} if $ENV{'DXSPIDER_ROOT'};
 
+	unshift @INC, "$root/perl";	# this IS the right way round!
 	unshift @INC, "$root/local";
 }