Don't append () to the name of an object attribute in the index.

This commit is contained in:
Fred Drake 1998-04-12 03:49:46 +00:00
parent 6250205166
commit ae9bc67e0e
1 changed files with 2 additions and 2 deletions

View File

@ -671,8 +671,8 @@ sub do_env_memberdesc{
$class = $THIS_CLASS
unless $class;
$extra = " ($class_name attribute)"
if $class;
my $idx = make_str_index_entry($3, "<tt>$member()</tt>$extra");
if (!($class eq));
my $idx = make_str_index_entry($3, "<tt>$member</tt>$extra");
$idx =~ s/ \(.*\)//;
$idx =~ s/\(\)//;
"<dl><dt><b>$idx</b>\n<dd>" . $_ . "</dl>";