From bcfdd06eec201626e38bdd68d97c9582af455727 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Fri, 7 Mar 2008 19:26:24 +0000 Subject: (all_files): call allbinfiles. git-svn-id: svn://tug.org/texlive/trunk@6880 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/TeXLive/TLPOBJ.pm | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) (limited to 'Master/tlpkg') diff --git a/Master/tlpkg/TeXLive/TLPOBJ.pm b/Master/tlpkg/TeXLive/TLPOBJ.pm index bb2fd061aa9..9576f7eb24f 100644 --- a/Master/tlpkg/TeXLive/TLPOBJ.pm +++ b/Master/tlpkg/TeXLive/TLPOBJ.pm @@ -782,11 +782,7 @@ sub all_files { push (@ret, $self->docfiles); push (@ret, $self->runfiles); push (@ret, $self->srcfiles); - - my %binfiles = %{$self->binfiles}; - foreach my $arch (keys %binfiles) { - push (@ret, @{$binfiles{$arch}}); - } + push (@ret, $self->allbinfiles); return @ret; } @@ -798,6 +794,7 @@ sub allbinfiles { foreach my $arch (keys %binfiles) { push (@ret, @{$binfiles{$arch}}); } + return @ret; } -- cgit v1.2.3