3 # Save privileged options
5 require './spam-lib.pl';
6 &error_setup($text{'priv_err'});
8 &set_config_file_in(\%in);
9 &can_use_check("priv");
10 &execute_before("priv");
12 $conf = &get_config();
14 &parse_opt($conf, "auto_whitelist_path", \&check_path);
15 &parse_opt($conf, "auto_whitelist_file_mode", \&check_mode);
16 &parse_opt($conf, "dcc_options", \&check_args);
17 &parse_opt($conf, "timelog_path", \&check_path);
18 &parse_opt($conf, "razor_config", \&check_path);
22 &execute_after("priv");
24 &redirect($redirect_url);
28 $_[0] =~ /^(\/|\~)\S+$/ || &error(&text('priv_epath', $_[0]));
33 $_[0] =~ /^[0-7]{4}$/ || &error(&text('priv_emode', $_[0]));
38 $_[0] =~ /^[A-Za-z \-]+$/ || &error(&text('priv_eargs', $_[0]));