include i386-linux in size calc, do not include

hyph-utf8 in lang collections.


git-svn-id: svn://tug.org/texlive/trunk@30385 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 6 insertions, 4 deletions

diff --git a/Master/tlpkg/bin/tlpsizes b/Master/tlpkg/bin/tlpsizes
index 1ee7f83a8ae..b198168c01d 100755
--- a/Master/tlpkg/bin/tlpsizes
+++ b/Master/tlpkg/bin/tlpsizes
@@ -53,12 +53,14 @@ sub main {
     my @pkgs = $tlpdb->expand_dependencies ("-no-collections", $tlpdb, $name);
  
     # get sizes of those packages.
-    # args say: include src, include doc, (no) platforms, just our pkgs.
-    my $pkg_sizes = $tlpdb->sizes_of_packages (1, 1, undef, @pkgs);
+    # args say: include src, include doc, just i386-linux for a
+    # mid-sized sample, just our pkgs.
+    my $pkg_sizes = $tlpdb->sizes_of_packages (1, 1, ["i386-linux"], @pkgs);
 
     $c_size{$name} = $pkg_sizes->{__TOTAL__};
-    delete $pkg_sizes->{"__TOTAL__"};  # don't need that any more
-    delete $pkg_sizes->{$name};        # always includes itself, with zero size    
+    delete $pkg_sizes->{"__TOTAL__"}; # don't need that any more
+    delete $pkg_sizes->{"hyph-utf8"} if $name =~ m/^collection-lang/;
+    delete $pkg_sizes->{$name};       # always includes itself, with zero size
 
     $c_pkgs{$name} = &pkgs_by_size (%$pkg_sizes);