From 41e0fd6ea6aea6950255f3671c6e8c5c6f71fded Mon Sep 17 00:00:00 2001
From: minima <minima>
Date: Tue, 15 Oct 2002 13:04:48 +0000
Subject: [PATCH] sort the include paths out

---
 perl/create_usdb.pl   | 1 +
 perl/gen_usdb_data.pl | 1 +
 2 files changed, 2 insertions(+)

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";
 }
 
-- 
2.34.1