diff options
| -rw-r--r-- | Doc/perl/l2hinit.perl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/Doc/perl/l2hinit.perl b/Doc/perl/l2hinit.perl index d3720d9..58ed604 100644 --- a/Doc/perl/l2hinit.perl +++ b/Doc/perl/l2hinit.perl @@ -181,12 +181,12 @@ sub make_nav_panel { sub get_version_text { if ($PACKAGE_VERSION ne '' && $t_date) { return ("<span class=\"release-info\">" - . "Release $PACKAGE_VERSION," + . "Release $PACKAGE_VERSION$RELEASE_INFO," . " documentation updated on $t_date.</span>"); } if ($PACKAGE_VERSION ne '') { return ("<span class=\"release-info\">" - . "Release $PACKAGE_VERSION.</span>"); + . "Release $PACKAGE_VERSION$RELEASE_INFO.</span>"); } if ($t_date) { return ("<span class=\"release-info\">Documentation released on " @@ -325,11 +325,11 @@ sub add_module_idx { my $plat = ''; $key =~ s/<tt>([a-zA-Z0-9._]*)<\/tt>/\1/; if ($ModulePlatforms{$key} && !$allthesame) { - $plat = (" <em>(<span class='platform'>$ModulePlatforms{$key}" + $plat = (" <em>(<span class=\"platform\">$ModulePlatforms{$key}" . '</span>)</em>'); } print MODIDXFILE $moditem . $IDXFILE_FIELD_SEP - . "<tt class='module'>$key</tt>$plat###\n"; + . "<tt class=\"module\">$key</tt>$plat###\n"; } close(MODIDXFILE); @@ -415,7 +415,7 @@ sub do_cmd_textohtmlinfopage { if ($t_date) { # mostly ours $the_version = ",\n$t_date"; if ($PACKAGE_VERSION) { - $the_version .= ", Release $PACKAGE_VERSION"; + $the_version .= ", Release $PACKAGE_VERSION$RELEASE_INFO"; } } $_ = (($INFO == 1) |