diff options
| author | Fred Drake <fdrake@acm.org> | 1999-01-12 04:16:51 (GMT) |
|---|---|---|
| committer | Fred Drake <fdrake@acm.org> | 1999-01-12 04:16:51 (GMT) |
| commit | 5a0ca4e55caa415c57b68cb2cd519c9939d26035 (patch) | |
| tree | 06f60a5a75a9839fd2459987dc079bb45cef7f53 /Doc/perl/python.perl | |
| parent | 4856d017970a8b59cfbc3814ab2c32d2503b1d82 (diff) | |
| download | cpython-5a0ca4e55caa415c57b68cb2cd519c9939d26035.zip cpython-5a0ca4e55caa415c57b68cb2cd519c9939d26035.tar.gz cpython-5a0ca4e55caa415c57b68cb2cd519c9939d26035.tar.bz2 | |
do_cmd_methodline(): Fixed reference to method name when generating
the output HTML.
Diffstat (limited to 'Doc/perl/python.perl')
| -rw-r--r-- | Doc/perl/python.perl | 6 |
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>" |