forked from vadimk/virtualmin-nginx
-
Notifications
You must be signed in to change notification settings - Fork 0
/
index.cgi
31 lines (18 loc) · 762 Bytes
/
index.cgi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
#!/usr/bin/perl
use File::Find;
require 'nginx-lib.pl';
ui_print_header(undef, $text{'index_title'}, "", undef, 1, 1);
@tabs = (['global', 'Global Configuration'], ['existing', 'Existing Virtual Hosts'], ['create', 'Create Virtual Host']);
print ui_tabs_start(\@tabs, 'mode', 'existing');
print ui_tabs_start_tab('mode', 'global');
do 'views/global-settings.pl';
print &ui_form_end([ [ "save", $text{'save'} ] ]);
print ui_tabs_end_tab('mode', 'global');
print ui_tabs_start_tab('mode', 'existing');
do 'views/existing-hosts.pl';
print ui_tabs_end_tab('mode', 'existing');
print ui_tabs_start_tab('mode', 'create');
do 'views/create-hosts.pl';
print ui_tabs_end_tab('mode', 'create');
print ui_tabs_end();
ui_print_footer("/", $text{'index'});