diff options
| author | Norbert Preining <preining@logic.at> | 2018-02-27 01:10:30 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2018-02-27 01:10:30 +0000 |
| commit | 04171e19f1ec02203684474b948e71b0d14333d6 (patch) | |
| tree | e4a389ac302086b7646c3bfbc9141aa483006f4e /Master | |
| parent | d0a63315e81ba8c3baedf4bce61bc0d913fd12ed (diff) | |
fix uninitialized warning in debug statement
git-svn-id: svn://tug.org/texlive/trunk@46750 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master')
| -rw-r--r-- | Master/tlpkg/TeXLive/TLPDB.pm | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Master/tlpkg/TeXLive/TLPDB.pm b/Master/tlpkg/TeXLive/TLPDB.pm index d52e7081062..910d531fbaa 100644 --- a/Master/tlpkg/TeXLive/TLPDB.pm +++ b/Master/tlpkg/TeXLive/TLPDB.pm @@ -2054,7 +2054,9 @@ sub _install_data { $target .= "/$TeXLive::TLConfig::RelocTree"; } } - debug("tlpdb:_install_data: what=$what, target=$target, size=$whatsize, checksum=$whatcheck, tmpdir=$tempdir\n"); + my $ww = ($whatsize || "<unset>"); + my $ss = ($whatcheck || "<unset>"); + debug("tlpdb:_install_data: what=$what, target=$target, size=$ww, checksum=$ss, tmpdir=$tempdir\n"); my ($ret, $pkg) = TeXLive::TLUtils::unpack($what, $target, 'size' => $whatsize, 'checksum' => $whatcheck, 'tmpdir' => $tempdir); if (!$ret) { tlwarn("TLPDB::_install_package: $pkg\n"); |