summaryrefslogtreecommitdiffstats
path: root/Doc/perl
diff options
context:
space:
mode:
authorFred Drake <fdrake@acm.org>2006-12-19 22:06:09 (GMT)
committerFred Drake <fdrake@acm.org>2006-12-19 22:06:09 (GMT)
commit51d00223c35f9e8f983cc7d1cb8ba1c62b86355a (patch)
tree3503dbf250be18beb5227960aeb3f30e777c1e64 /Doc/perl
parent9a4e95ccc89fa7723df3190555402ebefce7a21d (diff)
downloadcpython-51d00223c35f9e8f983cc7d1cb8ba1c62b86355a.zip
cpython-51d00223c35f9e8f983cc7d1cb8ba1c62b86355a.tar.gz
cpython-51d00223c35f9e8f983cc7d1cb8ba1c62b86355a.tar.bz2
hide version notes for 1.x and 2.x from the HTML version
Diffstat (limited to 'Doc/perl')
-rw-r--r--Doc/perl/python.perl6
1 files changed, 5 insertions, 1 deletions
diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl
index cf0301e..5e940e6 100644
--- a/Doc/perl/python.perl
+++ b/Doc/perl/python.perl
@@ -422,11 +422,15 @@ sub versionnote($$){
local $_ = $_[1];
my $explanation = next_optional_argument();
my $release = next_argument();
+ my $classes = "versionnote";
+ if ($release =~ /^(\d+)\./) {
+ $classes .= " versionnote$1";
+ }
my $text = "$type in version $release.";
if ($explanation) {
$text = "$type in version $release:\n$explanation.";
}
- return "\n<span class=\"versionnote\">$text</span>\n" . $_;
+ return "\n<span class=\"$classes\" \n>$text</span>\n" . $_;
}
sub do_cmd_versionadded{