diff options
| author | Norbert Preining <preining@logic.at> | 2017-11-13 14:46:04 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2017-11-13 14:46:04 +0000 |
| commit | 0a02e64a0bffda4a790855d51deab7d8df6e3937 (patch) | |
| tree | 85fa797d8f93b0e6e8ac1373a45c0b1edb627ce2 /Master/tlpkg/TeXLive/TLPDB.pm | |
| parent | 30583788d2cdc36d25194cbb4014008d35efa409 (diff) | |
fix possible undefined behaviour in paper handling
git-svn-id: svn://tug.org/texlive/trunk@45774 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLPDB.pm')
| -rw-r--r-- | Master/tlpkg/TeXLive/TLPDB.pm | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Master/tlpkg/TeXLive/TLPDB.pm b/Master/tlpkg/TeXLive/TLPDB.pm index 32015fa692d..b4e79bd8711 100644 --- a/Master/tlpkg/TeXLive/TLPDB.pm +++ b/Master/tlpkg/TeXLive/TLPDB.pm @@ -737,6 +737,7 @@ sub get_package { sub _get_package { my ($self,$pkg) = @_; + return undef if (!$pkg); if (defined($self->{'tlps'}{$pkg})) { my $ret = $self->{'tlps'}{$pkg}; return $self->{'tlps'}{$pkg}; |