From 695a01b2694c8d49ae25bce61b9b14653a3e26cf Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Sat, 10 May 2008 16:02:39 +0000 Subject: small fix to TLPOBJ.pm git-svn-id: svn://tug.org/texlive/trunk@8026 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/TeXLive/TLPOBJ.pm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/Master/tlpkg/TeXLive/TLPOBJ.pm b/Master/tlpkg/TeXLive/TLPOBJ.pm index 3d7d323cdef..09fad0aafd5 100644 --- a/Master/tlpkg/TeXLive/TLPOBJ.pm +++ b/Master/tlpkg/TeXLive/TLPOBJ.pm @@ -509,6 +509,9 @@ sub make_container { my $compresscmd; my $tlpobjdir = "$InfraLocation/tlpobj"; my %binf = %{$self->{'binfiles'}}; + if (!defined($containername)) { + $containername = $self->name; + } foreach (keys %binf) { push @files, @{$binf{$_}}; } -- cgit v1.2.3