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

View of /RegSubMa/RegSubMa.pm

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1.1.1 - (download) (as text) (annotate) (vendor branch)
Wed Apr 4 17:08:51 2007 UTC (13 years, 2 months ago) by mkubal
Branch: MAIN, fig
CVS Tags: v_1_0_0, HEAD
Changes since 1.1: +0 -0 lines
initial checkin

package RegSubMa;

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/css/RegSubMa.css");
  $template->param(JAVASCRIPT        => "./Html/layout.js");
  $template->param(LOGO              => "./Html/seed-logo-green.png");
  $template->param(LOGO_ALT          => "RegSubMa");
  #$template->param(TITLE_IMAGE       => "./Html/48-title.png");
  $template->param(TITLE_ALT         => "RegSubMa");
  $template->param(VERSION           => "RegSubMa 1.0");
  $template->param(TITLE_DESCRIPTION => "A Tool for the Integration of Regulation, Subsystem and Microarray Data");
  $template->param(FOOTER            => "");
}

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3