summaryrefslogtreecommitdiffstats
path: root/Doc/perl
diff options
context:
space:
mode:
authorFred Drake <fdrake@acm.org>2004-01-13 23:43:58 (GMT)
committerFred Drake <fdrake@acm.org>2004-01-13 23:43:58 (GMT)
commit3f26af765d0e892f04882c9c7d3b4950bdde5569 (patch)
treec7abe808b6db61d1e5b08a759d22a9e6104582fd /Doc/perl
parent3bbd115735dc8536e2da2cc869f8d8d81edbf3b8 (diff)
downloadcpython-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.perl3
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);