*** empty log message ***
[spider.git] / perl / DXUser.pm
index cf847bc897778748295e61aa41d15962a8ef83a3..892f1a59d1e7d1ea61d6c1b08b1fa66a4b517a3f 100644 (file)
@@ -375,7 +375,7 @@ BEGIN {
        
        # try to detect 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>;