diff options
-rw-r--r-- | Master/tlpkg/TeXLive/TLUtils.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/Master/tlpkg/TeXLive/TLUtils.pm b/Master/tlpkg/TeXLive/TLUtils.pm index 6c4d564cf3d..342318596a6 100644 --- a/Master/tlpkg/TeXLive/TLUtils.pm +++ b/Master/tlpkg/TeXLive/TLUtils.pm @@ -3666,6 +3666,9 @@ sub _create_config_files { tlwarn("Updating $dest, backup copy in $dest.backup\n"); copy("-f", $dest, "$dest.backup"); } + # ensure destination directory exists. + my $destdir = dirname ($dest); + -d $destdir || mkdirhier $destdir; # if fails, the next open will die. open(OUTFILE,">$dest") or die("Cannot open $dest for writing: $!"); |