summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorFred Drake <fdrake@acm.org>1999-01-12 04:16:51 (GMT)
committerFred Drake <fdrake@acm.org>1999-01-12 04:16:51 (GMT)
commit5a0ca4e55caa415c57b68cb2cd519c9939d26035 (patch)
tree06f60a5a75a9839fd2459987dc079bb45cef7f53
parent4856d017970a8b59cfbc3814ab2c32d2503b1d82 (diff)
downloadcpython-5a0ca4e55caa415c57b68cb2cd519c9939d26035.zip
cpython-5a0ca4e55caa415c57b68cb2cd519c9939d26035.tar.gz
cpython-5a0ca4e55caa415c57b68cb2cd519c9939d26035.tar.bz2
do_cmd_methodline(): Fixed reference to method name when generating
the output HTML.
-rw-r--r--Doc/perl/python.perl6
1 files changed, 3 insertions, 3 deletions
diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl
index de47e97..ff0bd88 100644
--- a/Doc/perl/python.perl
+++ b/Doc/perl/python.perl
@@ -621,13 +621,13 @@ sub do_env_methoddesc{
my $class_name = next_optional_argument();
$class_name = $THIS_CLASS
unless $class_name;
- my $method_name = next_argument();
+ my $method = next_argument();
my $arg_list = next_argument();
my $extra = '';
if ($class_name) {
$extra = " ($class_name method)";
}
- my $idx = make_str_index_entry("<tt>$method_name()</tt>$extra");
+ my $idx = make_str_index_entry("<tt>$method()</tt>$extra");
$idx =~ s/ \(.*\)//;
$idx =~ s/\(\)//;
return "<dl><dt><b>$idx</b> (<var>$arg_list</var>)\n<dd>" . $_ . '</dl>';
@@ -645,7 +645,7 @@ sub do_cmd_methodline{
if ($class_name) {
$extra = " ($class_name method)";
}
- my $idx = make_str_index_entry("<tt>$method_name()</tt>$extra");
+ my $idx = make_str_index_entry("<tt>$method()</tt>$extra");
$idx =~ s/ \(.*\)//;
$idx =~ s/\(\)//;
return "<dt><b>$idx</b> (<var>$arg_list</var>)\n<dd>"