diff options
author | Norbert Preining <preining@logic.at> | 2008-05-18 15:01:38 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-05-18 15:01:38 +0000 |
commit | 60aa6779744c7c0bf4dc2fa08c5f7bc29d224ffd (patch) | |
tree | 12581e80a18c24a66a846b7aece2e4f4648cb0e0 /Master/tlpkg/TeXLive/TLMedia.pm | |
parent | fb23237500098e7be792a4dc278e9d015eb8f40a (diff) |
TLMedia, TLUtils: install docfiles even if opt_doc = 0 for packages of
category Documentation. For these packages it would be useless to exclude
docfiles.
git-svn-id: svn://tug.org/texlive/trunk@8205 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLMedia.pm')
-rw-r--r-- | Master/tlpkg/TeXLive/TLMedia.pm | 12 |
1 files changed, 9 insertions, 3 deletions
diff --git a/Master/tlpkg/TeXLive/TLMedia.pm b/Master/tlpkg/TeXLive/TLMedia.pm index bddbdd529fd..f1eb9062e45 100644 --- a/Master/tlpkg/TeXLive/TLMedia.pm +++ b/Master/tlpkg/TeXLive/TLMedia.pm @@ -106,6 +106,12 @@ sub install_package { # get options about src/doc splitting from $totlpdb my $opt_src = $totlpdb->option_srcfiles; my $opt_doc = $totlpdb->option_docfiles; + my $real_opt_doc = $opt_doc; + if ($tlpobj->category =~ m/documentation/i) { + # we do install documenation files for category Documentation + # even if opt_doc is false + $real_opt_doc = 1; + } tllog($::LOG_NORMAL, "install: $pkg\n"); foreach my $h (@::install_packages_hook) { &$h("install: $package"); @@ -127,7 +133,7 @@ sub install_package { push @installfiles, $_; } } - if ($opt_doc) { + if ($real_opt_doc) { foreach ($tlpobj->docfiles) { # s!^!$location/!; push @installfiles, $_; @@ -164,7 +170,7 @@ sub install_package { $srccontainer =~ s/(\.tar\.lzma|\.zip)$/.source$1/; $self->_install_package($srccontainer,\@installfiles,$totlpdb); } - if ($container_doc_split && $opt_doc && + if ($container_doc_split && $real_opt_doc && ($pkg !~ m/\./) && $tlpobj->docfiles) { my $doccontainer = $container; $doccontainer =~ s/(\.tar\.lzma|\.zip)$/.doc$1/; @@ -176,7 +182,7 @@ sub install_package { if (!$opt_src) { $tlpobj->clear_srcfiles; } - if (!$opt_doc) { + if (!$real_opt_doc) { $tlpobj->clear_docfiles; } # we have to write out the tlpobj file since it is contained in the |