diff options
author | Norbert Preining <preining@logic.at> | 2012-05-13 04:16:46 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2012-05-13 04:16:46 +0000 |
commit | 87ef2ac351a942f5f6a920947af04bbeffcf1c96 (patch) | |
tree | 17ffb6fe9c33e7e487cb003a9fb9b041e0978379 /Master/tlpkg | |
parent | 10b8e59cb0e70df6d7e8d56c23be177e10d9267f (diff) |
add debug statemnet
git-svn-id: svn://tug.org/texlive/trunk@26324 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg')
-rw-r--r-- | Master/tlpkg/TeXLive/TLTREE.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/Master/tlpkg/TeXLive/TLTREE.pm b/Master/tlpkg/TeXLive/TLTREE.pm index 8300d78369b..b288a597038 100644 --- a/Master/tlpkg/TeXLive/TLTREE.pm +++ b/Master/tlpkg/TeXLive/TLTREE.pm @@ -216,6 +216,9 @@ sub get_matching_files { my $PKGNAME = $pkg; my $newp; eval "\$newp = \"$p\""; + if (!defined($newp)) { + print "Huuu: cannot generate newp from p: p=$p, pkg=$pkg, arch=$arch, type=$type\n"; + } return($self->_get_matching_files($type,$newp)); } |