From 883c55014140323341adc8d19e748f6a893f7947 Mon Sep 17 00:00:00 2001 From: Karl Berry Date: Fri, 14 May 2021 16:34:42 +0000 Subject: handle doc.html being in texlive-scripts git-svn-id: svn://tug.org/texlive/trunk@59191 c570f23f-e606-0410-a88d-b1316a301751 --- Master/tlpkg/bin/tl-update-docindex | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) (limited to 'Master/tlpkg/bin') diff --git a/Master/tlpkg/bin/tl-update-docindex b/Master/tlpkg/bin/tl-update-docindex index 0bacda10cd8..69a39571125 100755 --- a/Master/tlpkg/bin/tl-update-docindex +++ b/Master/tlpkg/bin/tl-update-docindex @@ -40,8 +40,8 @@ sorted by package name.

For documentation on TeX Live itself, see the texlive-en package below and its several nearby translations, as well as the texlive.infra -package. There are also links from the index.html page -here. +and texlive-scripts packages. There are +also links from the index.html page here. END_HEADER print_all_pkg($tlpdb); @@ -155,7 +155,7 @@ sub push_pkg_list { if (defined $dflanguage && $dflanguage ne "en"); $list .= "\n"; } - $list =~ s/( )?\n$/./; + $list =~ s/( )?\n$//; push @lines, "$list\n\n"; } @@ -168,6 +168,7 @@ sub find_doc_dir { my $shortest_dir = "a" x 1000; my $name_dir = ""; for my $f (@docfiles) { + next if $f eq "doc.html"; # top-level doc.html is just confusing my $dir = dirname($f); # if we find a file in a directory named for the package, @@ -198,7 +199,7 @@ sub find_doc_dir { if ($shortest_dir !~ m,/,) { # should never happen except for texlive.infra, which has the - # top-level index.html, so it works out ok. + # top-level index.html. warn "no shortest dir for $name, should never happen! docfiles=@docfiles" unless $name eq "texlive.infra"; return ""; -- cgit v1.2.3