summaryrefslogtreecommitdiff
path: root/Master/tlpkg/TeXLive/TLPOBJ.pm
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2007-12-03 17:29:03 +0000
committerNorbert Preining <preining@logic.at>2007-12-03 17:29:03 +0000
commit73c5ccf1eacaaf6057e330055ffa1b9965077f39 (patch)
tree324ef25ff9948c5edf3b8dc1cce8a68bae5c4d3c /Master/tlpkg/TeXLive/TLPOBJ.pm
parentbe79c31adc58dd25d3bf67b062105456d5c16ab3 (diff)
factor out more of the install_package to TLUtils and make it
more or less generic. git-svn-id: svn://tug.org/texlive/trunk@5700 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg/TeXLive/TLPOBJ.pm')
-rw-r--r--Master/tlpkg/TeXLive/TLPOBJ.pm16
1 files changed, 15 insertions, 1 deletions
diff --git a/Master/tlpkg/TeXLive/TLPOBJ.pm b/Master/tlpkg/TeXLive/TLPOBJ.pm
index 73a692151a1..5709cd9bf1a 100644
--- a/Master/tlpkg/TeXLive/TLPOBJ.pm
+++ b/Master/tlpkg/TeXLive/TLPOBJ.pm
@@ -747,13 +747,23 @@ sub all_files {
push (@ret, $self->srcfiles);
my %binfiles = %{$self->binfiles};
- for my $arch (keys %binfiles) {
+ foreach my $arch (keys %binfiles) {
push (@ret, @{$binfiles{$arch}});
}
return @ret;
}
+sub allbinfiles {
+ my $self = shift;
+ my @ret;
+ my %binfiles = %{$self->binfiles};
+ foreach my $arch (keys %binfiles) {
+ push (@ret, @{$binfiles{$arch}});
+ }
+ return @ret;
+}
+
# member access functions
#
@@ -1184,6 +1194,10 @@ adds or removes files for the given type (only for C<run>, C<src>, C<doc>).
returns a list of all files of all types.
+=item C<allbinfiles>
+
+returns a list of all binary files.
+
=back
=head1 SEE ALSO