From ff23b767abc786ac5279f6e85f5a83a143c055f5 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Sat, 11 May 2013 23:39:35 +0000 Subject: texmf-dist git-svn-id: svn://tug.org/texlive/trunk@30411 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/bin/htmltext | 3 ++- Master/tlpkg/bin/tlpsizes | 2 +- 2 files changed, 3 insertions(+), 2 deletions(-) (limited to 'Master/tlpkg/bin') diff --git a/Master/tlpkg/bin/htmltext b/Master/tlpkg/bin/htmltext index b03826a5d4c..99daca0ab37 100755 --- a/Master/tlpkg/bin/htmltext +++ b/Master/tlpkg/bin/htmltext @@ -19,5 +19,6 @@ for url in "$@"; do # Since the reference list is useful, we fix it up by hand instead of # using -nolist. lynx -dump -nocolor -hiddenlinks=ignore "$url" \ - | sed 's,file://localhost/tmp/,file:,' + | sed -e 's,file://localhost/home/texlive/karl/Master/,file:../,' \ + -e 's,file://localhost/home/texlive/karl/,file:../../,' done diff --git a/Master/tlpkg/bin/tlpsizes b/Master/tlpkg/bin/tlpsizes index b198168c01d..795e935cdd0 100755 --- a/Master/tlpkg/bin/tlpsizes +++ b/Master/tlpkg/bin/tlpsizes @@ -60,7 +60,6 @@ sub main { $c_size{$name} = $pkg_sizes->{__TOTAL__}; 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); @@ -86,6 +85,7 @@ sub pkgs_by_size { for my $p (sort { $pkg_sizes{$b} <=> $pkg_sizes{$a} } keys %pkg_sizes) { + next if $pkg_sizes{$p} == 0; $ret .= " "; $ret .= $pkg_sizes{$p} / 1024; $ret .= "/$p"; -- cgit v1.2.3