summaryrefslogtreecommitdiff
path: root/Master/tlpkg/installer
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2019-12-21 23:18:19 +0000
committerKarl Berry <karl@freefriends.org>2019-12-21 23:18:19 +0000
commit83c63420b969b7ed183561d697241f3847986adb (patch)
tree994ff407f86db547addc94b83aa1178fe4042b99 /Master/tlpkg/installer
parent5c2f94c006a089039b922a9b91c8200360f9278f (diff)
TLUtils.pm (texdir_check): return failure if given $texdir contains
various characters special to kpathsea expansion, such as ,$:{};{}\ If passed new optional second argument, print a message saying so. install-menu-text.pl (directories_menu, main_menu): pass the second argument to texdir_check. TLPOBJ.pm, TeXCatalogue.pm: doc updates. tl-try-install: accept -p and -r for profile and repo; also check $profiledir/$profile.pro for convenience. TLcomma.pro: new test profile (fails, as expected). This is in response to a query from Victor Kong on the tex-live list: https://tug.org/pipermail/tex-live/2019-December/044586.html git-svn-id: svn://tug.org/texlive/trunk@53204 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/installer')
-rw-r--r--Master/tlpkg/installer/install-menu-text.pl4
1 files changed, 2 insertions, 2 deletions
diff --git a/Master/tlpkg/installer/install-menu-text.pl b/Master/tlpkg/installer/install-menu-text.pl
index bef093d075c..82cb81032fb 100644
--- a/Master/tlpkg/installer/install-menu-text.pl
+++ b/Master/tlpkg/installer/install-menu-text.pl
@@ -503,7 +503,7 @@ sub directories_menu
);
menu_head "Directories customization:";
- if (!TeXLive::TLUtils::texdir_check($vars{'TEXDIR'})) {
+ if (!TeXLive::TLUtils::texdir_check($vars{'TEXDIR'}, 1)) {
print "!! The default location as given below is forbidden or
!! can't be written to.
!! Either change the destination directory using <1> or create it
@@ -1068,7 +1068,7 @@ EOF
TEXDIR (the main TeX directory):
EOF
- if (TeXLive::TLUtils::texdir_check($vars{'TEXDIR'})) {
+ if (TeXLive::TLUtils::texdir_check($vars{'TEXDIR'}, 1)) {
print " $vars{'TEXDIR'}\n";
} else {
print " !! default location: $vars{'TEXDIR'}\n";