From: minima Date: Sun, 27 Jan 2002 17:07:25 +0000 (+0000) Subject: fix check for local_cmd X-Git-Tag: R_1_50~71 X-Git-Url: http://scm.dxcluster.org/gitweb/gitweb.cgi?a=commitdiff_plain;ds=sidebyside;h=cc7d21f9962165b2cdfe5c37814d0764740ee511;p=spider.git fix check for local_cmd --- diff --git a/perl/cluster.pl b/perl/cluster.pl index 205d2fe7..aef9a4be 100755 --- a/perl/cluster.pl +++ b/perl/cluster.pl @@ -28,7 +28,7 @@ BEGIN { die "$root/local doesn't exist, please RTFM" unless -d "$root/local"; die "$root/local/DXVars.pm doesn't exist, please RTFM" unless -e "$root/local/DXVars.pm"; - mkdir "$root/local_cmd" unless -e "$root/local_cmd"; + mkdir "$root/local_cmd", 0777 unless -d "$root/local_cmd"; # try to create and lock a lockfile (this isn't atomic but