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

Annotation of /RAST/rast.cgi

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.2 - (view) (download)

1 : paarmann 1.1 use strict;
2 :     use warnings;
3 :    
4 :     use DBMaster;
5 :     use WebApplication;
6 :     use WebMenu;
7 :     use WebLayout;
8 :     use WebConfig;
9 :    
10 :     my $layout = WebLayout->new('./Html/RASTLayout.tmpl');
11 :     $layout->add_css(TMPL_PATH.'/default.css');
12 :     $layout->add_css(TMPL_PATH.'/rast.css');
13 :    
14 :     my $menu = WebMenu->new();
15 :     $menu->add_category('Home', 'rast.cgi', undef, [ 'login' ]);
16 :     $menu->add_category('Your Jobs', 'rast.cgi?page=Jobs', undef, [ 'login' ]);
17 :     $menu->add_entry('Your Jobs', 'Jobs Overview', 'rast.cgi?page=Jobs');
18 :     $menu->add_entry('Your Jobs', 'Upload New Job', 'rast.cgi?page=Upload');
19 :    
20 :    
21 :     my $WebApp = WebApplication->new( { id => 'RAST',
22 :     menu => $menu,
23 :     layout => $layout,
24 :     default => 'Home',
25 :     } );
26 :    
27 : paarmann 1.2 $WebApp->page_title_prefix('RAST Server - ');
28 : paarmann 1.1 $WebApp->run();

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3