X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fconsole.pl;fp=perl%2Fconsole.pl;h=b919d07660cf9ca95d7abf13bee2fb64b8027659;hb=6a17c3a3e2f7a72c0d13a93c90a010b753319def;hp=3258af44ffb1441b734146b5bee5c7d58a8b4a5c;hpb=f43ac25669a7b9368d9537eed2043a864a906303;p=spider.git

diff --git a/perl/console.pl b/perl/console.pl
index 3258af44..b919d076 100755
--- a/perl/console.pl
+++ b/perl/console.pl
@@ -29,12 +29,16 @@ our $foreground;
 our $background;
 our $mycallcolor;
 our @colors;
+our $data;
+our $local_data;
 
 # search local then perl directories
 BEGIN {
 	# root of directory tree for this system
 	$root = "/spider"; 
 	$root = $ENV{'DXSPIDER_ROOT'} if $ENV{'DXSPIDER_ROOT'};
+	$local_data = "$root/local_data";
+	$data = "$root/data";
 	
 	unshift @INC, "$root/perl";	# this IS the right way round!
 	unshift @INC, "$root/local";