X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2FDXUtil.pm;h=8bb9b956c59d306b8aab36b6cab0807bca10c5bd;hb=34f47f7d220c9244769f1c6360a92fcae18803ba;hp=4477a94bef90a3ef8e5abdc5ad5814fc53eb3bbb;hpb=a460c345801374bfdccaf135ab1b03e5115f4266;p=spider.git diff --git a/perl/DXUtil.pm b/perl/DXUtil.pm index 4477a94b..8bb9b956 100644 --- a/perl/DXUtil.pm +++ b/perl/DXUtil.pm @@ -477,9 +477,11 @@ sub localdata if (-e "$main::local_data") { $tfn = "$main::data/$ifn"; - if (-e $tfn && -e $ofn) { + if ((-e $tfn) && (-e $ofn)) { $ofn = $tfn if -M $ofn < -M $tfn; - } + } else { + $ofn = $tfn if -e $tfn; + } } return $ofn;