EnsEMBL::Web::Document::HTML TwoColTable
Package variablesGeneral documentationMethods
Toolbar
WebCvsRaw content
Package variables
No package variables defined.
Included modules
CGI qw ( escapeHTML )
Synopsis
No synopsis!
Description
No description!
Methods
_row
No description
Code
add_row
No description
Code
new
No description
Code
render
No description
Code
Methods description
None available.
Methods code
_rowdescriptionprevnextTop
sub _row {
  my($self, $label, $value ) = @_;
  return sprintf '<tr>
    <th>%s</th>
    <td>%s</td>
  </tr>', escapeHTML($label), $value;
}
add_rowdescriptionprevnextTop
sub add_row {
  my($self, $label, $value) = @_;
  push @{$self->{'content'}}, $self->_row( $label, $value );
}
newdescriptionprevnextTop
sub new {
  my $class = shift;
  my $self = { 'content' => [] };
  bless $self, $class;
  return $self;
}
renderdescriptionprevnextTop
sub render {
  my $self = shift;
  my $html = qq(<table class="twocol">\n);
  $html .= join '',@{$self->{'content'}};
  $html .= "</table>\n";
  return $html;
}

1;
}
General documentation
No general documentation available.