diff options
author | Fred Drake <fdrake@acm.org> | 2001-05-09 15:32:14 (GMT) |
---|---|---|
committer | Fred Drake <fdrake@acm.org> | 2001-05-09 15:32:14 (GMT) |
commit | caa79a9ee4b738bfa0295dcdbd67dfd2b48a1efd (patch) | |
tree | e97d3a8631b3c634788fd88bc831ce44b915baca /Doc/perl/SynopsisTable.pm | |
parent | 4862ab7bf45f3de4a5365a3dc76fb6a4c727057d (diff) | |
download | cpython-caa79a9ee4b738bfa0295dcdbd67dfd2b48a1efd.zip cpython-caa79a9ee4b738bfa0295dcdbd67dfd2b48a1efd.tar.gz cpython-caa79a9ee4b738bfa0295dcdbd67dfd2b48a1efd.tar.bz2 |
Minor adjustments to HTML for the module synopsis tables.
Diffstat (limited to 'Doc/perl/SynopsisTable.pm')
-rw-r--r-- | Doc/perl/SynopsisTable.pm | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/Doc/perl/SynopsisTable.pm b/Doc/perl/SynopsisTable.pm index 6a03dd2..9e528ab 100644 --- a/Doc/perl/SynopsisTable.pm +++ b/Doc/perl/SynopsisTable.pm @@ -52,14 +52,18 @@ sub show{ sub tohtml{ my $self = shift; - my $data = "<table class='synopsistable'>\n"; + my $oddrow = 1; + my $data = "<table class='synopsistable' valign='baseline'>\n"; my $name; foreach $name (split /,/, $self->{names}) { my($key,$type,$synopsis) = $self->get($name); my $link = "<a href='module-$key.html'>"; - $data .= (' <tr>' + $data .= (' <tr' + . ($oddrow ? " class='oddrow'>\n " : '>') . "<td><b><tt class='module'>$link$name</a></tt></b></td>\n" + . " <td>\ </td>\n" . " <td class='synopsis'>$synopsis</td></tr>\n"); + $oddrow = !$oddrow; } $data .= "</table>\n"; $data; |