Use the same names for CLASS attributes as elsewhere.
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 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;