[Bio] / RAST / rast.cgi Repository:
ViewVC logotype

Diff of /RAST/rast.cgi

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4, Fri Feb 29 21:19:26 2008 UTC revision 1.5, Tue Apr 8 20:18:42 2008 UTC
# Line 7  Line 7 
7  use WebLayout;  use WebLayout;
8  use WebConfig;  use WebConfig;
9    
10  my $layout = WebLayout->new('./Html/RASTLayout.tmpl');  
11    # read local WebConfig because we need it here
12    &WebConfig::import_local_config('RAST');
13    
14    
15    # choose a layout
16    my $layout = WebLayout->new('./Html/RAST.tmpl');
17    if ($WebConfig::RAST_TYPE eq 'metagenome') {
18        $layout = WebLayout->new('./Html/RAST-MG.tmpl');
19    }
20  $layout->add_css(TMPL_PATH.'/default.css');  $layout->add_css(TMPL_PATH.'/default.css');
21  $layout->add_css(TMPL_PATH.'/rast.css');  $layout->add_css(TMPL_PATH.'/rast.css');
22    
23    
24  # add site meter  # add site meter
25  my $site_meter = $FIG_Config::site_meter;  my $site_meter = $FIG_Config::site_meter;
26  if ($site_meter) {  if ($site_meter) {
27      $layout->add_javascript("http://s20.sitemeter.com/js/counter.js?site=s20nmpdr");      $layout->add_javascript("http://s20.sitemeter.com/js/counter.js?site=s20nmpdr");
28  }  }
29    
30    
31    # create the menu
32  my $menu = WebMenu->new();  my $menu = WebMenu->new();
33  $menu->add_category('Home', 'rast.cgi', undef, [ 'login' ]);  $menu->add_category('Home', 'rast.cgi', undef, [ 'login' ]);
34  $menu->add_category('Your Jobs', 'rast.cgi?page=Jobs', undef, [ 'login' ]);  $menu->add_category('Your Jobs', 'rast.cgi?page=Jobs', undef, [ 'login' ]);
# Line 25  Line 37 
37  $menu->add_category('Import Control', 'rast.cgi?page=ControlCenter', undef, [ 'import' ]);  $menu->add_category('Import Control', 'rast.cgi?page=ControlCenter', undef, [ 'import' ]);
38    
39    
40    # init the WebApplication
41  my $WebApp = WebApplication->new( { id       => 'RAST',  my $WebApp = WebApplication->new( { id       => 'RAST',
42                                      menu     => $menu,                                      menu     => $menu,
43                                      layout   => $layout,                                      layout   => $layout,

Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3