summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TLPOBJ.pm
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-05-05 05:09:42 +0000
committerNorbert Preining <preining@logic.at>2008-05-05 05:09:42 +0000
commit997021b6f04b72ee67e9272a17c5060ff9bc135b (patch)
tree90317dab039ff0c89f3fb42b844b52fa80ec892b /Master/tlpkg/TeXLive/TLPOBJ.pm
parentf266635f6985382f8c0152a873023a260618bd57 (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/TLPOBJ.pm')
-rw-r--r--Master/tlpkg/TeXLive/TLPOBJ.pm34
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>