diff options
| author | Norbert Preining <preining@logic.at> | 2008-05-10 16:02:39 +0000 |
|---|---|---|
| committer | Norbert Preining <preining@logic.at> | 2008-05-10 16:02:39 +0000 |
| commit | 695a01b2694c8d49ae25bce61b9b14653a3e26cf (patch) | |
| tree | 3ac43474191f5666907b50115b3da8579a860790 | |
| parent | 8e5c31b85843119a31e4359278ebb9a2bd29a161 (diff) | |
small fix to TLPOBJ.pm
git-svn-id: svn://tug.org/texlive/trunk@8026 c570f23f-e606-0410-a88d-b1316a301751
| -rw-r--r-- | Master/tlpkg/TeXLive/TLPOBJ.pm | 3 |
1 files changed, 3 insertions, 0 deletions
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{$_}}; } |