diff options
author | Fred Drake <fdrake@acm.org> | 2004-01-13 23:43:58 (GMT) |
---|---|---|
committer | Fred Drake <fdrake@acm.org> | 2004-01-13 23:43:58 (GMT) |
commit | 3f26af765d0e892f04882c9c7d3b4950bdde5569 (patch) | |
tree | c7abe808b6db61d1e5b08a759d22a9e6104582fd /Doc/perl | |
parent | 3bbd115735dc8536e2da2cc869f8d8d81edbf3b8 (diff) | |
download | cpython-3f26af765d0e892f04882c9c7d3b4950bdde5569.zip cpython-3f26af765d0e892f04882c9c7d3b4950bdde5569.tar.gz cpython-3f26af765d0e892f04882c9c7d3b4950bdde5569.tar.bz2 |
- add comment about $CUSTOM_BUTTONS
- use_icon(): fix the check for whether a supplemental link is being
used
Diffstat (limited to 'Doc/perl')
-rw-r--r-- | Doc/perl/l2hinit.perl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl index 87f73db..e955e7c 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); |