From: minima <minima>
Date: Sun, 26 Aug 2001 13:15:34 +0000 (+0000)
Subject: added missing unshift for path
X-Git-Tag: R_1_48~78
X-Git-Url: http://dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=419788d21c120283da8f97c875d726db1a2f04fa;p=spider.git

added missing unshift for path
---

diff --git a/perl/lock_nodes.pl b/perl/lock_nodes.pl
index 8f4875e7..c80c6973 100755
--- a/perl/lock_nodes.pl
+++ b/perl/lock_nodes.pl
@@ -19,7 +19,7 @@ BEGIN {
 	# root of directory tree for this system
 	$root = "/spider"; 
 	$root = $ENV{'DXSPIDER_ROOT'} if $ENV{'DXSPIDER_ROOT'};
-
+        unshift @INC, "$root/perl";     # this IS the right way round!
 	unshift @INC, "$root/local";
 }