diff options
author | Norbert Preining <preining@logic.at> | 2008-05-05 05:09:42 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-05-05 05:09:42 +0000 |
commit | 997021b6f04b72ee67e9272a17c5060ff9bc135b (patch) | |
tree | 90317dab039ff0c89f3fb42b844b52fa80ec892b /Master/tlpkg/TeXLive | |
parent | f266635f6985382f8c0152a873023a260618bd57 (diff) |
support disabling/enabling os fsrc/doc files split and out adaption
of the installers wrt the options presented
git-svn-id: svn://tug.org/texlive/trunk@7854 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive')
-rw-r--r-- | Master/tlpkg/TeXLive/TLPOBJ.pm | 34 |
1 files changed, 24 insertions, 10 deletions
diff --git a/Master/tlpkg/TeXLive/TLPOBJ.pm b/Master/tlpkg/TeXLive/TLPOBJ.pm index 3b35a617412..ddc588aab6e 100644 --- a/Master/tlpkg/TeXLive/TLPOBJ.pm +++ b/Master/tlpkg/TeXLive/TLPOBJ.pm @@ -46,6 +46,16 @@ sub new { +sub copy { + my $self = shift; + my $bla = {}; + %$bla = %$self; + bless $bla, "TeXLive::TLPOBJ"; + return $bla; +} + + + sub from_file { my $self = shift; if (@_ != 1) { @@ -695,7 +705,7 @@ sub is_meta_package { return 0; } -sub split_doc_package { +sub docfiles_package { my $self = shift; if (not($self->docfiles)) { return ; } my $tlp = new TeXLive::TLPOBJ; @@ -705,12 +715,12 @@ sub split_doc_package { $tlp->category($self->category); $tlp->add_docfiles($self->docfiles); $tlp->docsize($self->docsize); - $self->clear_docfiles(); - $self->docsize(0); + # $self->clear_docfiles(); + # $self->docsize(0); return($tlp); } -sub split_src_package { +sub srcfiles_package { my $self = shift; if (not($self->srcfiles)) { return ; } my $tlp = new TeXLive::TLPOBJ; @@ -720,8 +730,8 @@ sub split_src_package { $tlp->category($self->category); $tlp->add_srcfiles($self->srcfiles); $tlp->srcsize($self->srcsize); - $self->clear_srcfiles(); - $self->srcsize(0); + # $self->clear_srcfiles(); + # $self->srcsize(0); return($tlp); } @@ -1195,11 +1205,15 @@ The original package is changed in two respects: the binfiles are removed (since they are now in the single name.arch packages), and an additional depend on "name.ARCH" is added. Note that the ARCH is a placeholder. -=item C<split_src_package> +=item C<srcfiles_package> + +=item C<docfiles_package> -splits off the srcfiles of C<TLPOBJ> into new independent C<TLPOBJ> with -the original name plus ".sources". The source files are removed from the -original package. +splits off the srcfiles or docfiles of C<TLPOBJ> into new independent +C<TLPOBJ> with +the original name plus ".sources". The source/doc files are +B<not> removed from the original package, since these functions are only +used for the creation of split containers. =item C<is_arch_dependent> |