Merge branch 'mojo' of ssh://server/scm/spider into mojo

[spider.git] / perl / cluster.pl

diff --git a/perl/cluster.pl b/perl/cluster.pl
index 4aa81c62e939b52467dbbe1a4bb24de4b5a69c02..054a22ca718dbde98003e13f4824ff76b738ceca 100755 (executable)
--- a/perl/cluster.pl
+++ b/perl/cluster.pl
@@ -21,6 +21,12 @@ use vars qw($root $is_win $systime);
 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'};
@@ -69,7 +75,7 @@ use DXVars;
 use SysVar;
 
 use strict;
-                       
+
 use Mojo::IOLoop;
 
 use Msg;