traverseda
/
cpython
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Update to use the newly separated values $PACKAGE_VERSION and $RELEASE_INFO. 

Normalize all HTML attributes to be written as name="value" instead of
name='value'.
This commit is contained in:
Fred Drake 2001-06-20 21:31:36 +00:00
parent b8248d8cff
commit dce975c820
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
Doc/perl/l2hinit.perl
View File

@ -181,12 +181,12 @@ sub make_nav_panel {
sub get_version_text { sub get_version_text {
if ($PACKAGE_VERSION ne '' && $t_date) { if ($PACKAGE_VERSION ne '' && $t_date) {
return ("<span class=\"release-info\">" return ("<span class=\"release-info\">"
. "Release $PACKAGE_VERSION," . "Release $PACKAGE_VERSION$RELEASE_INFO,"
. " documentation updated on $t_date.</span>"); . " documentation updated on $t_date.</span>");
} }
if ($PACKAGE_VERSION ne '') { if ($PACKAGE_VERSION ne '') {
return ("<span class=\"release-info\">" return ("<span class=\"release-info\">"
. "Release $PACKAGE_VERSION.</span>"); . "Release $PACKAGE_VERSION$RELEASE_INFO.</span>");
} }
if ($t_date) { if ($t_date) {
return ("<span class=\"release-info\">Documentation released on " return ("<span class=\"release-info\">Documentation released on "
@ -325,11 +325,11 @@ sub add_module_idx {
my $plat = ''; my $plat = '';
$key =~ s/<tt>([a-zA-Z0-9._]*)<\/tt>/\1/; $key =~ s/<tt>([a-zA-Z0-9._]*)<\/tt>/\1/;
if ($ModulePlatforms{$key} && !$allthesame) { if ($ModulePlatforms{$key} && !$allthesame) {
$plat = (" <em>(<span class='platform'>$ModulePlatforms{$key}" $plat = (" <em>(<span class=\"platform\">$ModulePlatforms{$key}"
. '</span>)</em>'); . '</span>)</em>');
} }
print MODIDXFILE $moditem . $IDXFILE_FIELD_SEP print MODIDXFILE $moditem . $IDXFILE_FIELD_SEP
. "<tt class='module'>$key</tt>$plat###\n"; . "<tt class=\"module\">$key</tt>$plat###\n";
} }
close(MODIDXFILE); close(MODIDXFILE);
@ -415,7 +415,7 @@ sub do_cmd_textohtmlinfopage {
if ($t_date) { # mostly ours if ($t_date) { # mostly ours
$the_version = ",\n$t_date"; $the_version = ",\n$t_date";
if ($PACKAGE_VERSION) { if ($PACKAGE_VERSION) {
$the_version .= ", Release $PACKAGE_VERSION"; $the_version .= ", Release $PACKAGE_VERSION$RELEASE_INFO";
} }
} }
$_ = (($INFO == 1) $_ = (($INFO == 1)