From: Fred Drake <fdrake@acm.org>
Date: Thu, 14 Sep 2000 22:20:41 +0000 (+0000)
Subject: When there is a Module Index, make sure the icon actually links to it.
X-Git-Tag: v2.0b2~316
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=aaa238585f53c039ebb2ef4a442841e217db877e;p=thirdparty%2FPython%2Fcpython.git

When there is a Module Index, make sure the icon actually links to it.
---

diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl
index 147be516f71d..d78efc86b686 100644
--- a/Doc/perl/l2hinit.perl
+++ b/Doc/perl/l2hinit.perl
@@ -437,7 +437,9 @@ sub add_bbl_and_idx_dummy_commands {
           . "([\\\\]begin\\s*$O\\d+$C\\s*theindex)";
         s/$rx/\\textohtmlmoduleindex \1 \\textohtmlindex \2/o;
         # Add a button to the navigation areas:
-        $CUSTOM_BUTTONS .= $my_icons{'modules'};
+        $CUSTOM_BUTTONS .= ('<a href="modindex.html" title="Module Index">'
+                            . $my_icons{'modules'}
+                            . '</a>');
     }
     else {
         $CUSTOM_BUTTONS .= $BLANK_ICON;