12 |
|
|
13 |
# choose a layout |
# choose a layout |
14 |
my $layout = WebLayout->new("$FIG_Config::fig/CGI/Html/RAST.tmpl"); |
my $layout = WebLayout->new("$FIG_Config::fig/CGI/Html/RAST.tmpl"); |
|
if ($WebConfig::RAST_TYPE eq 'metagenome') { |
|
|
$layout = WebLayout->new('./Html/RAST-MG.tmpl'); |
|
|
} |
|
15 |
$layout->add_css(TMPL_URL_PATH.'/default.css'); |
$layout->add_css(TMPL_URL_PATH.'/default.css'); |
16 |
$layout->add_css(TMPL_URL_PATH.'/rast.css'); |
$layout->add_css(TMPL_URL_PATH.'/rast.css'); |
17 |
|
|
24 |
# create the menu |
# create the menu |
25 |
my $menu = WebMenu->new(); |
my $menu = WebMenu->new(); |
26 |
|
|
|
if ($WebConfig::RAST_TYPE eq 'metagenome') { |
|
|
$menu->add_category('Home', 'metagenomics.cgi', undef, [ 'login' ]); |
|
|
} else { |
|
27 |
$menu->add_category('Home', 'rast.cgi', undef, [ 'login' ]); |
$menu->add_category('Home', 'rast.cgi', undef, [ 'login' ]); |
|
} |
|
|
|
|
28 |
$menu->add_category('Your Jobs', 'rast.cgi?page=Jobs', undef, [ 'login' ]); |
$menu->add_category('Your Jobs', 'rast.cgi?page=Jobs', undef, [ 'login' ]); |
29 |
$menu->add_entry('Your Jobs', 'Jobs Overview', 'rast.cgi?page=Jobs'); |
$menu->add_entry('Your Jobs', 'Jobs Overview', 'rast.cgi?page=Jobs'); |
30 |
$menu->add_entry('Your Jobs', 'Upload New Job', 'rast.cgi?page=Upload'); |
$menu->add_entry('Your Jobs', 'Upload New Job', 'rast.cgi?page=Upload'); |
31 |
|
$menu->add_entry('Your Jobs', 'Private Organism Preferences', '?page=PrivateOrganismPreferences'); |
32 |
$menu->add_category('Import Control', 'rast.cgi?page=ControlCenter', undef, [ 'import' ]); |
$menu->add_category('Import Control', 'rast.cgi?page=ControlCenter', undef, [ 'import' ]); |
33 |
|
|
34 |
|
|
39 |
default => 'Home', |
default => 'Home', |
40 |
} ); |
} ); |
41 |
|
|
|
if ($WebConfig::RAST_TYPE eq 'metagenome') { |
|
|
$WebApp->page_title_prefix('MG-RAST - '); |
|
|
} else { |
|
42 |
$WebApp->page_title_prefix('RAST Server - '); |
$WebApp->page_title_prefix('RAST Server - '); |
|
} |
|
43 |
|
|
44 |
$WebApp->run(); |
$WebApp->run(); |