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 147be51..d78efc8 100644
--- a/Doc/perl/l2hinit.perl
+++ b/Doc/perl/l2hinit.perl
@@ -437,7 +437,9 @@
           . "([\\\\]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;