From: Fred Drake <fdrake@acm.org>
Date: Tue, 13 Jan 2004 23:43:58 +0000 (+0000)
Subject: - add comment about $CUSTOM_BUTTONS
X-Git-Tag: v2.4a1~945
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=3f26af765d0e892f04882c9c7d3b4950bdde5569;p=thirdparty%2FPython%2Fcpython.git

- add comment about $CUSTOM_BUTTONS
- use_icon(): fix the check for whether a supplemental link is being
  used
---

diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl
index 87f73dbc6307..e955e7cff6c1 100644
--- a/Doc/perl/l2hinit.perl
+++ b/Doc/perl/l2hinit.perl
@@ -109,6 +109,7 @@ sub custom_driver_hook {
 }
 
 
+# $CUSTOM_BUTTONS is only used for the module index link.
 $CUSTOM_BUTTONS = '';
 
 sub make_nav_sectref($$$) {
@@ -163,7 +164,7 @@ sub unlinkify($) {
 
 sub use_icon($$$) {
     my($rel,$str,$title) = @_;
-    if ($title) {
+    if ($str) {
         my $s = "$str";
         if ($s =~ /\<tex2html_([a-z_]+)_visible_mark\>/) {
             my $r = get_my_icon($1);