diff options
-rwxr-xr-x | Master/texmf-dist/scripts/texlive/tlmgr.pl | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/Master/texmf-dist/scripts/texlive/tlmgr.pl b/Master/texmf-dist/scripts/texlive/tlmgr.pl index afa877ce975..6ecb22d6eaa 100755 --- a/Master/texmf-dist/scripts/texlive/tlmgr.pl +++ b/Master/texmf-dist/scripts/texlive/tlmgr.pl @@ -74,9 +74,16 @@ BEGIN { # if not in bootstrapping mode => kpsewhich exists, so use it to get $Master chomp($Master = `kpsewhich -var-value=SELFAUTOPARENT`); } - $::installerdir = $Master; - # + # if we have no directory in which to find our modules, + # no point in going on. + if (! $Master) { + die ("Could not determine directory of tlmgr executable, " + . "maybe shared library woes?\nCheck for error messages above"); + } + + $::installerdir = $Master; # for config.guess et al., see TLUtils.pm + # make Perl find our packages first: unshift (@INC, "$Master/tlpkg"); unshift (@INC, "$Master/texmf-dist/scripts/texlive"); |