diff options
| author | Fred Drake <fdrake@acm.org> | 1999-04-21 15:58:58 (GMT) |
|---|---|---|
| committer | Fred Drake <fdrake@acm.org> | 1999-04-21 15:58:58 (GMT) |
| commit | ca675e491baffc9edf73f3470de7516b15fbb40c (patch) | |
| tree | 47b742fbccf3b8a5a8cee4699ca4e56c70ad84fc /Doc/perl | |
| parent | 3d815bd1c7e344f047a647b959f522085769419e (diff) | |
| download | cpython-ca675e491baffc9edf73f3470de7516b15fbb40c.zip cpython-ca675e491baffc9edf73f3470de7516b15fbb40c.tar.gz cpython-ca675e491baffc9edf73f3470de7516b15fbb40c.tar.bz2 | |
do_cmd_funcline(): Remove some bogus generated stuff from the output
(some text was only intended for the index).
Diffstat (limited to 'Doc/perl')
| -rw-r--r-- | Doc/perl/python.perl | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/Doc/perl/python.perl b/Doc/perl/python.perl index abd17e8..eb6dfdf 100644 --- a/Doc/perl/python.perl +++ b/Doc/perl/python.perl @@ -589,10 +589,11 @@ sub do_cmd_funcline{ local($_) = @_; my $function_name = next_argument(); my $arg_list = next_argument(); - my $idx = make_str_index_entry("<tt class=function>$function_name()</tt>" - . get_indexsubitem()); - $idx =~ s/\(\)//; - return "<dt><b>$idx</b> (<var>$arg_list</var>)\n<dd>" . $_; + my $prefix = "<tt class=function>$function_name()</tt>"; + my $idx = make_str_index_entry($prefix . get_indexsubitem()); + $prefix =~ s/\(\)//; + + return "<dt><b>$prefix</b> (<var>$arg_list</var>)\n<dd>" . $_; } # Change this flag to index the opcode entries. I don't think it's very |