[Bio] / GBBergeyDB / GBBergeyDB.pm Repository:
ViewVC logotype

View of /GBBergeyDB/GBBergeyDB.pm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.2 - (download) (as text) (annotate)
Fri Mar 2 15:16:54 2007 UTC (12 years, 8 months ago) by paczian
Branch: MAIN
CVS Tags: HEAD
Changes since 1.1: +1 -1 lines
fixed css path

package GBBergeyDB;

use base qw( WebLayout );

1;

sub set_content {
  my ($self, $parameters) = @_;
  
  my $content = $parameters->{content} || "";
  my $menu    = $parameters->{menu} || "";
  my $title   = $parameters->{title} || "";

  # fill in variable template parameters
  my $template = $self->_template;
  $template->param( CONTENT => $content);
  $template->param( MENU    => $menu );
  $template->param( TITLE   => $title );

  # fill in static template parameters
  $template->param(STYLESHEET        => "./Html/genomeselector.css");
  $template->param(JAVASCRIPT        => "");
  $template->param(LOGO              => "./Html/selector-logo.gif");
  $template->param(LOGO_ALT          => "");
  $template->param(TITLE_IMAGE       => "./Html/selector-title.gif");
  $template->param(TITLE_ALT         => "Genome Selector");
  $template->param(VERSION           => "version 1.0");
  $template->param(TITLE_DESCRIPTION => "");
  $template->param(FOOTER            => "");
}

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3