summaryrefslogtreecommitdiffstats
path: root/Doc/perl
diff options
context:
space:
mode:
authorFred Drake <fdrake@acm.org>2000-05-02 17:37:42 (GMT)
committerFred Drake <fdrake@acm.org>2000-05-02 17:37:42 (GMT)
commit52e7684af1fb70a806c813372884f4183ce38bb5 (patch)
tree6a6e0e763d5f2744be32ccfcaa93622487404f25 /Doc/perl
parente06d025e00e84493b96b1152d1f1f48c751ca729 (diff)
downloadcpython-52e7684af1fb70a806c813372884f4183ce38bb5.zip
cpython-52e7684af1fb70a806c813372884f4183ce38bb5.tar.gz
cpython-52e7684af1fb70a806c813372884f4183ce38bb5.tar.bz2
do_cmd_versionchanged():
Added support for optional parameter explaining the change that was made in the specified version.
Diffstat (limited to 'Doc/perl')
-rw-r--r--Doc/perl/python.perl7
1 files changed, 6 insertions, 1 deletions
diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl
index 2866a36..4033c62 100644
--- a/Doc/perl/python.perl
+++ b/Doc/perl/python.perl
@@ -281,8 +281,13 @@ sub do_cmd_versionadded{
sub do_cmd_versionchanged{
# one parameter: \versionchanged{version}
local($_) = @_;
+ my $explanation = next_optional_argument();
my $release = next_argument();
- return "\nChanged in version $release.\n" . $_;
+ my $text = "\nChanged in version $release.\n";
+ if ($release) {
+ $text = "\nChanged in version $release:\n$explanation.\n";
+ }
+ return $text . $_;
}
#