Handle hostnames with upper-case letters
[webmin.git] / apache / save_defines.cgi
1 #!/usr/local/bin/perl
2 # save_defines.cgi
3 # Save defined run-time httpd parameters
4
5 require './apache-lib.pl';
6 $access{'global'}==1 || &error($text{'defines_ecannot'});
7 &lock_file("$module_config_directory/site");
8 &ReadParse();
9 $site{'defines'} = join(" ", split(/\s+/, $in{'defines'}));
10 &write_file("$module_config_directory/site", \%site);
11 &unlock_file("$module_config_directory/site");
12 &webmin_log("defines", undef, undef, \%in);
13 &redirect("");