diff options
Diffstat (limited to 'Master/tlpkg/bin/tlpfiles')
-rwxr-xr-x | Master/tlpkg/bin/tlpfiles | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/Master/tlpkg/bin/tlpfiles b/Master/tlpkg/bin/tlpfiles index 7a73540b907..cd9d51e8ee8 100755 --- a/Master/tlpkg/bin/tlpfiles +++ b/Master/tlpkg/bin/tlpfiles @@ -1,6 +1,6 @@ #!/usr/bin/env perl # $Id$ -# Copyright 2007-2015 Karl Berry. +# Copyright 2007-2020 Karl Berry. # This file is licensed under the GNU General Public License version 2 # or any later version. # @@ -54,6 +54,9 @@ sub main { my $pkg = $ARGV[0]; my $tlpdb = TeXLive::TLPDB->new (root => $Master); + if (! defined $tlpdb) { + die "$0: no texlive.tlpdb under $Master, goodbye"; + } my $obj = $tlpdb->get_package ($pkg); die "$0: no TeX Live package named $pkg in $Master.\n" if ! $obj; |