aboutsummaryrefslogtreecommitdiffstats
path: root/iurt2
diff options
context:
space:
mode:
Diffstat (limited to 'iurt2')
-rwxr-xr-xiurt24
1 files changed, 3 insertions, 1 deletions
diff --git a/iurt2 b/iurt2
index 9dcf2cc..f6af09d 100755
--- a/iurt2
+++ b/iurt2
@@ -43,6 +43,7 @@ use Iurt::Process qw(perform_command clean kill_for_good);
use Iurt::Mail qw(sendmail);
use Iurt::Util qw(plog_init plog);
use File::NCopy qw(copy);
+use File::Path qw(mkpath);
# I did not manage to make locks work over the network
#use File::lockf;
use Mkcd::Commandline qw(parseCommandLine usage);
@@ -432,6 +433,7 @@ if (!$lock && $run{dkms}) {
$local = 0
}
$run{lock} = $lock;
+
# cache file name is needed early to remove the manual lock file if the lock mechanism does not work
my $cachefile = "$config->{cache_home}/iurt.$run{distro_tag}.$run{my_arch}.$lock.cache";
$run{cachefile} = $cachefile;
@@ -451,7 +453,7 @@ if ($config->{local_spool}) {
plog(5, "using $local_spool as local spooler");
if (!-d "$local_spool/log") {
plog(5, "creating local spool $local_spool");
- mkdir_p("$local_spool/log") or die "FATAL $program_name: could not create local spool dir $local_spool ($!)"
+ mkpath("$local_spool/log") or die "FATAL $program_name: could not create local spool dir $local_spool ($!)"
}
$run{local_spool} = $local_spool;