Thanks to visit codestin.com
Credit goes to github.com

Skip to content

Commit aa99a50

Browse files
committed
Be a little more friendly for the generation of the text version: for
"blank" navigation icons, use ALT="" instead of ALT="blank"; also add ALIGN=CENTER for the table, to get a slightly better affect in the text (the table is full-width, so this doesn't change the appearance when browsing the HTML).
1 parent a54a887 commit aa99a50

1 file changed

Lines changed: 5 additions & 1 deletion

File tree

Doc/perl/l2hinit.perl

Lines changed: 5 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -109,6 +109,7 @@ sub set_icon_size{
109109

110110
$CUSTOM_BUTTONS = '';
111111
$BLANK_ICON = "\n<td>" . img_tag('blank.' . $IMAGE_TYPE) . "</td>";
112+
$BLANK_ICON =~ s/alt="blank"/alt=""/;
112113
$NAV_BGCOLOR = " bgcolor=\"#99CCFF\"";
113114

114115
sub make_nav_sectref{
@@ -121,7 +122,8 @@ sub make_nav_sectref{
121122
}
122123

123124
sub make_nav_panel{
124-
return ("<table width=\"100%\" cellpadding=0 cellspacing=2>\n<tr>"
125+
return ("<table align=center width=\"100%\" cellpadding=0 cellspacing=2>"
126+
. "\n<tr>"
125127
. "\n<td>$NEXT</td>"
126128
. "\n<td>$UP</td>"
127129
. "\n<td>$PREVIOUS</td>"
@@ -201,6 +203,8 @@ sub img_tag {
201203
my $nav_border = "$NAV_BORDER";
202204
if ($icon =~ /($alt)/) {
203205
$alt = $1;
206+
$alt = ""
207+
if ($alt eq "blank");
204208
}
205209
else {
206210
$nav_border = '1';

0 commit comments

Comments
 (0)