#!/usr/local/bin/perl
# save_global.cgi
# Save some type of global options

require './proftpd-lib.pl';
&ReadParse();
&lock_proftpd_files();
$conf = &get_config();
$global = &find_directive_struct("Global", $conf);
if ($global) {
	$gconf = $global->{'members'};
	}
else {
	# Need to create the global section ..
	local $lref = &read_file_lines($config{'proftpd_conf'});
	push(@$lref, "<Global>", "</Global>");
	&flush_file_lines();
	undef(@get_config_cache);
	$conf = &get_config();
	$global = &find_directive_struct("Global", $conf);
	$gconf = $global->{'members'};
	}
@edit = &editable_directives($in{'type'}, 'root');
@gedit = &editable_directives($in{'type'}, 'global');

&error_setup(&text('efailed', $text{"type_$in{'type'}"}));
&parse_inputs(\@edit, $conf, $conf);
&parse_inputs(\@gedit, $gconf, $conf);
&unlock_proftpd_files();
&webmin_log("global", $in{'type'}, undef, \%in);

&redirect("");

