summaryrefslogtreecommitdiffstats
path: root/Doc/perl
diff options
context:
space:
mode:
authorFred Drake <fdrake@acm.org>2001-03-02 18:57:05 (GMT)
committerFred Drake <fdrake@acm.org>2001-03-02 18:57:05 (GMT)
commitab357ecf7f5b65374eb967281a84965f05e5179c (patch)
treef8d95f0192bfaa765111cae5c7194d54dc2ad18b /Doc/perl
parent0539bfaaa423d52ea2a709eb4dccec062eb4d332 (diff)
downloadcpython-ab357ecf7f5b65374eb967281a84965f05e5179c.zip
cpython-ab357ecf7f5b65374eb967281a84965f05e5179c.tar.gz
cpython-ab357ecf7f5b65374eb967281a84965f05e5179c.tar.bz2
Label classes and exceptions explicitly in the documentation (for their
*desc environments).
Diffstat (limited to 'Doc/perl')
-rw-r--r--Doc/perl/python.perl6
1 files changed, 4 insertions, 2 deletions
diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl
index 289bb05..890066f 100644
--- a/Doc/perl/python.perl
+++ b/Doc/perl/python.perl
@@ -882,7 +882,7 @@ sub do_env_excdesc{
local($_) = @_;
my $excname = next_argument();
my $idx = make_str_index_entry("<tt class='exception'>$excname</tt>");
- return "<dl><dt><b>$idx</b>\n<dd>" . $_ . '</dl>'
+ return "<dl><dt><b>exception $idx</b>\n<dd>" . $_ . '</dl>'
}
sub do_env_fulllineitems{ return do_env_itemize(@_); }
@@ -895,7 +895,9 @@ sub handle_classlike_descriptor{
$idx = make_str_index_entry(
"<tt class='$what'>$THIS_CLASS</tt> ($what in $THIS_MODULE)" );
$idx =~ s/ \(.*\)//;
- return "<dl><dt><b>$idx</b> (<var>$arg_list</var>)\n<dd>" . $_ . '</dl>';
+ return ("<dl><dt><b>$what $idx</b> (<var>$arg_list</var>)\n<dd>"
+ . $_
+ . '</dl>');
}
sub do_env_classdesc{