projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
fix SysVar.pm problems (maybe)
[spider.git]
/
perl
/
cluster.pl
diff --git
a/perl/cluster.pl
b/perl/cluster.pl
index 4222132c2b982bee9fe2490d99cab9ca184ab224..ca73a8249e81017c3705c34689f156294d7afff8 100755
(executable)
--- a/
perl/cluster.pl
+++ b/
perl/cluster.pl
@@
-19,6
+19,12
@@
use warnings;
BEGIN {
umask 002;
BEGIN {
umask 002;
+ # take into account any local::lib that might be present
+ eval {
+ require local::lib;
+ };
+ import local::lib unless ($@);
+
# root of directory tree for this system
$root = "/spider";
$root = $ENV{'DXSPIDER_ROOT'} if $ENV{'DXSPIDER_ROOT'};
# root of directory tree for this system
$root = "/spider";
$root = $ENV{'DXSPIDER_ROOT'} if $ENV{'DXSPIDER_ROOT'};
@@
-59,12
+65,11
@@
BEGIN {
$systime = time;
}
$systime = time;
}
-
-use Mojo::IOLoop;
-
use DXVars;
use SysVar;
use DXVars;
use SysVar;
+use Mojo::IOLoop;
+
use Msg;
use IntMsg;
use Internet;
use Msg;
use IntMsg;
use Internet;