diff options
author | Karl Berry <karl@freefriends.org> | 2020-05-24 18:20:12 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2020-05-24 18:20:12 +0000 |
commit | c027b6f93e809722c87ab74b52279330d92bb471 (patch) | |
tree | 98163956b504ad56288b6d9364e74873663fc59f | |
parent | ac8c88536cd6023bfae898fb209751225f49ad89 (diff) |
trailing / on doc dir link; period+space after shortdesc
git-svn-id: svn://tug.org/texlive/trunk@55258 c570f23f-e606-0410-a88d-b1316a301751
-rwxr-xr-x | Master/tlpkg/bin/tl-update-docindex | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/Master/tlpkg/bin/tl-update-docindex b/Master/tlpkg/bin/tl-update-docindex index db41940223a..0bacda10cd8 100755 --- a/Master/tlpkg/bin/tl-update-docindex +++ b/Master/tlpkg/bin/tl-update-docindex @@ -128,7 +128,7 @@ sub push_pkg_list { # print package name with ctan link and shortdesc my $id = qq!id="$name"!; # should be unique my $dir = &find_doc_dir($name, @docfiles); - push @lines, qq#\n<li $id><b><a href="$dir">$name</a></b><small>\n#; + push @lines, qq#\n<li $id><b><a href="$dir/">$name</a></b><small>\n#; # # Don't link to CTAN if the package doesn't exist. # We could find more by looking at the .tlpsrc, but let's skip @@ -142,8 +142,7 @@ sub push_pkg_list { my $shortdesc = $tlpkg->shortdesc; # a few shortdescs already end with a period: $shortdesc =~ s/\.$// if defined $shortdesc; - #push @lines, "$shortdesc. \n" if defined $shortdesc; - push @lines, "$shortdesc\n" if defined $shortdesc; + push @lines, "$shortdesc. \n" if defined $shortdesc; #warn "$name\n" if not defined $shortdesc; # now the list of docfiles @@ -195,7 +194,7 @@ sub find_doc_dir { } # a directory by name is probably better than just the shortest. - return "$name_dir/" if $name_dir; + return $name_dir if $name_dir; if ($shortest_dir !~ m,/,) { # should never happen except for texlive.infra, which has the |