From a47e69be054e8aec500e52ffb1e0f76ba7f14791 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Tue, 24 Sep 2019 16:02:28 +0000 Subject: doc,sync git-svn-id: svn://tug.org/texlive/trunk@52167 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/TeXLive/TLPDB.pm | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'Master/tlpkg/TeXLive') diff --git a/Master/tlpkg/TeXLive/TLPDB.pm b/Master/tlpkg/TeXLive/TLPDB.pm index ac7b6c36505..70a1deaa2f4 100644 --- a/Master/tlpkg/TeXLive/TLPDB.pm +++ b/Master/tlpkg/TeXLive/TLPDB.pm @@ -290,6 +290,10 @@ sub from_file { } if ($params{'media'}) { $media = $params{'media'}; + } elsif (! -d $rootpath) { + # no point in going on if we don't even have a directory. + tlwarn("TLPDB: not a directory, not loading: $rootpath\n"); + return 0; } elsif (-d "$rootpath/texmf-dist/web2c") { $media = 'local_uncompressed'; } elsif (-d "$rootpath/texmf/web2c") { # older @@ -300,7 +304,7 @@ sub from_file { $media = 'local_compressed'; } else { # we cannot find the right type, return zero, hope people notice - tlwarn("Cannot determine type of tlpdb from $rootpath!\n"); + tlwarn("TLPDB: Cannot determine type of tlpdb from $rootpath!\n"); return 0; } } -- cgit v1.2.3