summaryrefslogtreecommitdiff
path: root/Master/tlpkg/installer/install-menu-text.pl
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/installer/install-menu-text.pl')
-rwxr-xr-xMaster/tlpkg/installer/install-menu-text.pl7
1 files changed, 4 insertions, 3 deletions
diff --git a/Master/tlpkg/installer/install-menu-text.pl b/Master/tlpkg/installer/install-menu-text.pl
index ac7c6e748d2..18d2fa66a0b 100755
--- a/Master/tlpkg/installer/install-menu-text.pl
+++ b/Master/tlpkg/installer/install-menu-text.pl
@@ -578,7 +578,7 @@ sub directories_menu
";
}
my $texmfdir = $vars{'TEXDIR'} .
- ($vars{'TEXDIR'} =~ /\/$/ ? 'texmf' : '/texmf');
+ ($vars{'TEXDIR'} =~ /\/$/ ? 'texmf-dist' : '/texmf-dist');
if (!$vars{'in_place'}) {
print <<"EOF";
<1> TEXDIR: $vars{'TEXDIR'}
@@ -700,7 +700,8 @@ sub input_dirname
# relative paths are unlikely to work in texmf.cnf, et al.,
# and don't have any apparent practical use. Convert to absolute.
if (! File::Spec->file_name_is_absolute($answer)) {
- $answer = Cwd::abs_path($answer);
+ $answer = TeXLive::TLUtils::tl_abs_path($answer);
+ $answer = "" unless defined $answer;
}
}
return $answer;
@@ -1124,7 +1125,7 @@ EOF
print " $vars{'TEXDIR'}\n";
} else {
print " !! default location: $vars{'TEXDIR'}\n";
- print " !! is not writable, please select a different one!\n";
+ print " !! is not writable or not allowed, please select a different one!\n";
}
print <<"EOF";
TEXMFLOCAL (directory for site-wide local files):