X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FSysVar.pm;h=a45218781f4bfde4fba7675144bbbc6bf6d85141;hb=e57c3e3573db848a474524fbe9723dea52e151a1;hp=92a81e4b4d584422ebcb879190e54a1cd0d7617c;hpb=dbc07bca561550cf5dd928796e1747f480929329;p=spider.git

diff --git a/perl/SysVar.pm b/perl/SysVar.pm
index 92a81e4b..a4521878 100644
--- a/perl/SysVar.pm
+++ b/perl/SysVar.pm
@@ -6,7 +6,8 @@
 #
 
 package main;
-use warnings;
+
+use vars qw($data $local_data $system $cmd $localcmd $userfn $motd);
 
 ##
 ## DXVars.pm overrides
@@ -26,12 +27,6 @@ $cmd = "$root/cmd";
 # local command files live in (and overide $cmd)
 $localcmd = "$root/local_cmd";
 
-# data files live in 
-$data = "$root/data";
-
-# for local data
-$local_data = "$root/local_data";
-
 # where the user data lives
 $userfn = "$local_data/users";