[Bio] / SubsystemEditor / SubsysEditor.cgi Repository:
ViewVC logotype

Annotation of /SubsystemEditor/SubsysEditor.cgi

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.5 - (view) (download)

1 : parrello 1.1 use strict;
2 :     use warnings;
3 :    
4 : parrello 1.2 use FIG_Config;
5 :     use lib "$FIG_Config::fig_disk/dist/current/$FIG_Config::arch/lib/WebApplication";
6 :     use lib "$FIG_Config::common_runtime/lib/SubsystemEditor";
7 :    
8 : parrello 1.1 use WebApplication;
9 :     use WebMenu;
10 :     use WebLayout;
11 :    
12 :     my $cgi = new CGI();
13 : bartels 1.3
14 :     my $layout = WebLayout->new('./Html/SubsystemEditorLayout.tmpl');
15 :     $layout->add_css('./Html/SubsystemEditor.css');
16 :     $layout->add_css('./Html/default.css');
17 :    
18 :     my $menu = WebMenu->new();
19 :     $menu->add_category( 'Home', 'SubsysEditor.cgi?page=SubsystemOverview' );
20 : bartels 1.5 $menu->add_category( 'Logout', 'SubsysEditor.cgi?page=Logout', undef, [ 'login' ] );
21 : bartels 1.3
22 :     my $WebApp = WebApplication->new( { id => 'SubsystemEditor',
23 :     menu => $menu,
24 :     layout => $layout,
25 :     default => 'SubsystemOverview',
26 :     } );
27 :    
28 :     $WebApp->show_login_user_info(1);
29 :     $WebApp->run();
30 :    

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3