texlive[59191] Master/tlpkg/bin/tl-update-docindex: handle doc.html

commits+karl at tug.org commits+karl at tug.org
Fri May 14 18:34:42 CEST 2021


Revision: 59191
          http://tug.org/svn/texlive?view=revision&revision=59191
Author:   karl
Date:     2021-05-14 18:34:42 +0200 (Fri, 14 May 2021)
Log Message:
-----------
handle doc.html being in texlive-scripts

Modified Paths:
--------------
    trunk/Master/tlpkg/bin/tl-update-docindex

Modified: trunk/Master/tlpkg/bin/tl-update-docindex
===================================================================
--- trunk/Master/tlpkg/bin/tl-update-docindex	2021-05-13 23:48:24 UTC (rev 59190)
+++ trunk/Master/tlpkg/bin/tl-update-docindex	2021-05-14 16:34:42 UTC (rev 59191)
@@ -40,8 +40,8 @@
 <p>For documentation on TeX Live itself, see the <a
 href="#texlive-en">texlive-en</a> package below and its several nearby
 translations, as well as the <a href="#texlive.infra">texlive.infra</a>
-package. There are also links from the <a href=".">index.html</a> page
-here.
+and <a href="#texlive-scripts">texlive-scripts</a> packages. There are
+also links from the <a href=".">index.html</a> page here.
 END_HEADER
 
   print_all_pkg($tlpdb);
@@ -155,7 +155,7 @@
              if (defined $dflanguage && $dflanguage ne "en");
     $list .= "\n";
   }
-  $list =~ s/( )?\n$/./;
+  $list =~ s/( )?\n$//;
   push @lines, "$list\n</small></li>\n";
 }
 
@@ -168,6 +168,7 @@
   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 @@
   
   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 "";



More information about the tex-live-commits mailing list.