X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcluster.pl;h=c005027911b49102e4030b85082b55424831b2df;hb=f726c14c2f603c02eabecc4526e588354a3a7e0b;hp=5d102e4f80a92062b4b66ccd484bc7a290853aac;hpb=d6ef92100b25e721a15d00da498256853cc0acf2;p=spider.git diff --git a/perl/cluster.pl b/perl/cluster.pl index 5d102e4f..c0050279 100755 --- a/perl/cluster.pl +++ b/perl/cluster.pl @@ -33,7 +33,7 @@ BEGIN { # try to create and lock a lockfile (this isn't atomic but # should do for now - $lockfn = "$root/perl/cluster.lck"; # lock file name + $lockfn = "$root/local/cluster.lck"; # lock file name if (-e $lockfn) { open(CLLOCK, "$lockfn") or die "Can't open Lockfile ($lockfn) $!"; my $pid = ;