Handle hostnames with upper-case letters
[webmin.git] / ipsec / bootup.cgi
1 #!/usr/local/bin/perl
2 # bootup.cgi
3 # Enable or disable the ipsec bootup action
4
5 require './ipsec-lib.pl';
6 &foreign_require("init", "init-lib.pl");
7 &ReadParse();
8
9 if ($in{'boot'} && $in{'starting'} != 2) {
10         &init::enable_at_boot("ipsec");
11         &webmin_log("boot");
12         }
13 elsif (!$in{'boot'} && $in{'starting'} == 2) {
14         &init::disable_at_boot("ipsec");
15         &webmin_log("unboot");
16         }
17 &redirect("");
18