[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.5, Tue Apr 8 20:18:42 2008 UTC revision 1.6, Mon Aug 18 20:29:32 2008 UTC
# Line 7  Line 7 
7  use WebLayout;  use WebLayout;
8  use WebConfig;  use WebConfig;
9    
   
10  # read local WebConfig because we need it here  # read local WebConfig because we need it here
11  &WebConfig::import_local_config('RAST');  &WebConfig::import_local_config('RAST');
12    
   
13  # choose a layout  # choose a layout
14  my $layout = WebLayout->new('./Html/RAST.tmpl');  my $layout = WebLayout->new('./Html/RAST.tmpl');
15  if ($WebConfig::RAST_TYPE eq 'metagenome') {  if ($WebConfig::RAST_TYPE eq 'metagenome') {
# Line 20  Line 18 
18  $layout->add_css(TMPL_PATH.'/default.css');  $layout->add_css(TMPL_PATH.'/default.css');
19  $layout->add_css(TMPL_PATH.'/rast.css');  $layout->add_css(TMPL_PATH.'/rast.css');
20    
   
21  # add site meter  # add site meter
22  my $site_meter = $FIG_Config::site_meter;  my $site_meter = $FIG_Config::site_meter;
23  if ($site_meter) {  if ($site_meter) {
24      $layout->add_javascript("http://s20.sitemeter.com/js/counter.js?site=s20nmpdr");      $layout->add_javascript("http://s20.sitemeter.com/js/counter.js?site=s20nmpdr");
25  }  }
26    
   
27  # create the menu  # create the menu
28  my $menu = WebMenu->new();  my $menu = WebMenu->new();
29    
30    if ($WebConfig::RAST_TYPE eq 'metagenome') {
31        $menu->add_category('Home', 'metagenomics.cgi', undef, [ 'login' ]);
32    } else {
33  $menu->add_category('Home', 'rast.cgi', undef, [ 'login' ]);  $menu->add_category('Home', 'rast.cgi', undef, [ 'login' ]);
34    }
35    
36  $menu->add_category('Your Jobs', 'rast.cgi?page=Jobs', undef, [ 'login' ]);  $menu->add_category('Your Jobs', 'rast.cgi?page=Jobs', undef, [ 'login' ]);
37  $menu->add_entry('Your Jobs', 'Jobs Overview', 'rast.cgi?page=Jobs');  $menu->add_entry('Your Jobs', 'Jobs Overview', 'rast.cgi?page=Jobs');
38  $menu->add_entry('Your Jobs', 'Upload New Job', 'rast.cgi?page=Upload');  $menu->add_entry('Your Jobs', 'Upload New Job', 'rast.cgi?page=Upload');
# Line 44  Line 46 
46                                      default  => 'Home',                                      default  => 'Home',
47                                    } );                                    } );
48    
49    if ($WebConfig::RAST_TYPE eq 'metagenome') {
50        $WebApp->page_title_prefix('MG-RAST - ');
51    } else {
52  $WebApp->page_title_prefix('RAST Server - ');  $WebApp->page_title_prefix('RAST Server - ');
53    }
54    
55  $WebApp->run();  $WebApp->run();

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

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3