summaryrefslogtreecommitdiff
path: root/Master/tlpkg
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2025-02-17 23:49:58 +0000
committerKarl Berry <karl@freefriends.org>2025-02-17 23:49:58 +0000
commit11ef26d5f49051d841e81b4f102f392f733899ba (patch)
treec1d43ee884312af2c213200991e3c4fc15db9309 /Master/tlpkg
parentaed25b26d771e53acb133f55d9ed51f40e419b68 (diff)
(_create_config_files): mkdirhier(dirname($dest)).
Report from Max, https://tug.org/pipermail/tex-live/2025-February/051149.html. git-svn-id: svn://tug.org/texlive/trunk@74083 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg')
-rw-r--r--Master/tlpkg/TeXLive/TLUtils.pm3
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: $!");