diff options
author | Norbert Preining <preining@logic.at> | 2007-12-23 21:38:57 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2007-12-23 21:38:57 +0000 |
commit | e8d394853e5aa3f38f3767070afb6f60624132b0 (patch) | |
tree | 46d35ce5fa68243b59b3edb5144072f1fa3f1dd3 /Master/tlpkg/TeXLive/TLPDB.pm | |
parent | 4852626f4cf33604cd1fb3f3e6a910ef3c79944e (diff) |
src and doc splitting
options setting via texlive.config meta package
update texlive.tlpdb for that
git-svn-id: svn://tug.org/texlive/trunk@5846 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLPDB.pm')
-rw-r--r-- | Master/tlpkg/TeXLive/TLPDB.pm | 93 |
1 files changed, 89 insertions, 4 deletions
diff --git a/Master/tlpkg/TeXLive/TLPDB.pm b/Master/tlpkg/TeXLive/TLPDB.pm index 0fb2400518b..3e5c6e482cb 100644 --- a/Master/tlpkg/TeXLive/TLPDB.pm +++ b/Master/tlpkg/TeXLive/TLPDB.pm @@ -35,6 +35,9 @@ C<TeXLive::TLPDB> -- A database of TeX Live Packages $tlpdb->language_dat_lines; $tlpdb->package_revision("packagename"); $tlpdb->location; + $tlpdb->config_src_container; + $tlpdb->config_doc_container; + $tlpdb->config_container_format; TeXLive::TLPDB->listdir([$dir]); $tlpdb->generate_listfiles([$destdir]); @@ -497,23 +500,78 @@ sub location { =pod - -=pod - =item C<< $tlpdb->listdir >> The function C<listdir> allows to read and set the packages variable specifiying where generated list files are created. =cut + sub listdir { my $self = shift; if (@_) { $_listdir = $_[0] } return $_listdir; } -=back +=pod + +=item C<< $tlpdb->config_src_container >> +Returns 1 if the the texlive config option for src files splitting on +container level is set. See Options below. + +=cut + +sub config_src_container { + my $self = shift; + if (defined($self->{'tlps'}{'texlive.config'})) { + foreach my $d ($self->{'tlps'}{'texlive.config'}->depends) { + if ($d eq "container_split_src_files") { + return 1; + } + } + } + return 0; +} + +=item C<< $tlpdb->config_doc_container >> + +Returns 1 if the the texlive config option for doc files splitting on +container level is set. See Options below. + +=cut + +sub config_doc_container { + my $self = shift; + if (defined($self->{'tlps'}{'texlive.config'})) { + foreach my $d ($self->{'tlps'}{'texlive.config'}->depends) { + if ($d eq "container_split_doc_files") { + return 1; + } + } + } + return 0; +} + +=item C<< $tlpdb->config_doc_container >> + +Returns the currently set default container format. See Options below. + +=cut + +sub config_container_format { + my $self = shift; + if (defined($self->{'tlps'}{'texlive.config'})) { + foreach my $d ($self->{'tlps'}{'texlive.config'}->depends) { + if ($d =~ m!^container_format/(.*)$!) { + return "$1"; + } + } + } + return ""; +} + +=pod =item C<< $tlpdb->fmtutil_cnf_lines >> @@ -627,6 +685,33 @@ sub language_dat_lines { =pod +=head1 OPTIONS + +Options regarding the full TeX Live installation to be described are saved +in a package C<texlive.config> as values of C<depend> lines. This special +package C<texlive.config> does not contain any files, only depend lines +which set one or more of the following options: + +=over 6 + +=item C<container_split_src_files> + +=item C<container_split_doc_files> + +These options specify that at container generation time the source and +documentation files for a package have been put into a separate container +named C<package.source.extension> and C<package.doc.extension>. + +=item C<container_format/I<format>> + +This option specifies a format for containers. The currently supported +formats are C<lzma> and C<zip>. But note that C<zip> is untested. + +=back + +To set these options the respective lines should be added to +C<texlive.config.tlpsrc>. + =head1 SEE ALSO The modules L<TeXLive::TLPSRC>, L<TeXLive::TLPOBJ>, |