summaryrefslogtreecommitdiff
path: root/Master/texmf
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2012-05-23 05:37:03 +0000
committerNorbert Preining <preining@logic.at>2012-05-23 05:37:03 +0000
commit85722e162ab8bc579a5d6e199ea7d70ebc5d2bec (patch)
tree7b03e3522be968ee0cd94faf52cb97ccf37b4f87 /Master/texmf
parented64153cb6d4b37b71ccc90c0d831943323ddeed (diff)
allow computation of sizes of packages based on a set of platforms
git-svn-id: svn://tug.org/texlive/trunk@26588 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf')
-rwxr-xr-xMaster/texmf/scripts/texlive/tlmgr.pl6
1 files changed, 4 insertions, 2 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgr.pl b/Master/texmf/scripts/texlive/tlmgr.pl
index 181ff6702c4..a8d31c8f005 100755
--- a/Master/texmf/scripts/texlive/tlmgr.pl
+++ b/Master/texmf/scripts/texlive/tlmgr.pl
@@ -2564,11 +2564,12 @@ sub action_update {
# sizes_of_packages returns the sizes of *all* packages if nothing
# is passed over, so if @new and @updated both are empty we will
# get something wrong back, namely the total size of all packages
+ # the third argument is undef to compute *all* platforms
my %sizes;
if (@alltodo) {
%sizes = %{$remotetlpdb->sizes_of_packages(
$localtlpdb->option("install_srcfiles"),
- $localtlpdb->option("install_docfiles"), @alltodo)};
+ $localtlpdb->option("install_docfiles"), undef, @alltodo)};
} else {
$sizes{'__TOTAL__'} = 0;
}
@@ -3319,9 +3320,10 @@ sub action_install {
return if (!@todo);
my $currnr = 1;
+ # undef here is a ref to array of platforms, if undef all are used
my %sizes = %{$remotetlpdb->sizes_of_packages(
$localtlpdb->option("install_srcfiles"),
- $localtlpdb->option("install_docfiles"), @todo)};
+ $localtlpdb->option("install_docfiles"), undef, @todo)};
defined($sizes{'__TOTAL__'}) || ($sizes{'__TOTAL__'} = 0);
my $totalsize = $sizes{'__TOTAL__'};
my $donesize = 0;