diff options
| -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>" |