- 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 87f73dbc6307fd867fa4eb441e6e995d30c68cbd..e955e7cff6c1cf1099aab8f6dbcf578a4ea6a20f 100644 (file)
--- 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);