diff options
| author | Fred Drake <fdrake@acm.org> | 1999-07-12 16:28:50 (GMT) |
|---|---|---|
| committer | Fred Drake <fdrake@acm.org> | 1999-07-12 16:28:50 (GMT) |
| commit | f930d827bb2b7bd9322d93a2791b613d45f1d6e5 (patch) | |
| tree | f13c8137a48ea28adccd93350a66a70d43176d57 /Doc/perl/SynopsisTable.pm | |
| parent | bb7eff96d4bf6f68fe588e988e172683745b44cd (diff) | |
| download | cpython-f930d827bb2b7bd9322d93a2791b613d45f1d6e5.zip cpython-f930d827bb2b7bd9322d93a2791b613d45f1d6e5.tar.gz cpython-f930d827bb2b7bd9322d93a2791b613d45f1d6e5.tar.bz2 | |
Use the same names for CLASS attributes as elsewhere.
Diffstat (limited to 'Doc/perl/SynopsisTable.pm')
| -rw-r--r-- | Doc/perl/SynopsisTable.pm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/Doc/perl/SynopsisTable.pm b/Doc/perl/SynopsisTable.pm index c4dc0dd..e12f2e7 100644 --- a/Doc/perl/SynopsisTable.pm +++ b/Doc/perl/SynopsisTable.pm @@ -38,13 +38,14 @@ sub show{ sub tohtml{ my $self = shift; - my $data = "<table>\n"; + my $data = "<table class=\"synopsistable\">\n"; my $name; foreach $name (split /,/, $self->{names}) { my($key,$type,$synopsis) = $self->get($name); my $link = "<a href=\"module-$key.html\">"; - $data .= (" <tr><td><b><tt>$link$name</a></tt></b></td>\n" - . " <td>$synopsis</td></tr>\n"); + $data .= (" <tr>" + . "<td><b><tt class=module>$link$name</a></tt></b></td>\n" + . " <td class=synopsis>$synopsis</td></tr>\n"); } $data .= "</table>\n"; $data; |