X-Git-Url: http://www.dxcluster.org/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fcluster.pl;h=c005027911b49102e4030b85082b55424831b2df;hb=83e360f5c54444dc63a14de5124ad0a78624bf5a;hp=5d102e4f80a92062b4b66ccd484bc7a290853aac;hpb=4132ec72fbe241d407e0af7ad00cef550d5b806e;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 = <CLLOCK>;