diff options
author | Norbert Preining <preining@logic.at> | 2008-10-03 17:02:34 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-10-03 17:02:34 +0000 |
commit | 63aac8c0246d383b7382fb56a9dcd4fb6487c807 (patch) | |
tree | 4570814647ce1124948adc4441ad48b24d158e26 /Master/tlpkg/TeXLive/TLMedia.pm | |
parent | 7caaf8301d3ae843c2a4ff1733477bd454c6aa25 (diff) |
do not ignore doc file splitting for packges containing a literal dot
git-svn-id: svn://tug.org/texlive/trunk@10841 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLMedia.pm')
-rw-r--r-- | Master/tlpkg/TeXLive/TLMedia.pm | 14 |
1 files changed, 9 insertions, 5 deletions
diff --git a/Master/tlpkg/TeXLive/TLMedia.pm b/Master/tlpkg/TeXLive/TLMedia.pm index 60138d7eb93..94188f5c0fa 100644 --- a/Master/tlpkg/TeXLive/TLMedia.pm +++ b/Master/tlpkg/TeXLive/TLMedia.pm @@ -168,16 +168,20 @@ sub install_package { # we install split containers under the following conditions: # - the container were split generated # - src/doc files should be installed - # - the package is not already a split one (like .i386-linux) + # (- the package is not already a split one (like .i386-linux)) + # the above test has been removed because it would mean that + # texlive.infra.doc.tar.lzma + # will never be installed, and we do already check that there + # are at all src/doc files, which in split packages of the form + # foo.ARCH are not present. And if they are present, than that is fine, + # too (bin-foobar.win32.doc.tar.lzma) # - there are actually src/doc files present - if ($container_src_split && $opt_src && - ($pkg !~ m/\./) && $tlpobj->srcfiles) { + if ($container_src_split && $opt_src && $tlpobj->srcfiles) { my $srccontainer = $container; $srccontainer =~ s/(\.tar\.lzma|\.zip)$/.source$1/; $self->_install_package($srccontainer,\@installfiles,$totlpdb) || return(0); } - if ($container_doc_split && $real_opt_doc && - ($pkg !~ m/\./) && $tlpobj->docfiles) { + if ($container_doc_split && $real_opt_doc && $tlpobj->docfiles) { my $doccontainer = $container; $doccontainer =~ s/(\.tar\.lzma|\.zip)$/.doc$1/; $self->_install_package($doccontainer,\@installfiles,$totlpdb) || return(0); |