mirror of
https://github.com/webmin/webmin.git
synced 2026-02-09 00:39:57 +00:00
39 lines
1.2 KiB
Perl
Executable File
39 lines
1.2 KiB
Perl
Executable File
#!/usr/local/bin/perl
|
|
# edit_priv.cgi
|
|
# Display various privileged settings
|
|
|
|
require './spam-lib.pl';
|
|
&can_use_check("priv");
|
|
&ui_print_header(undef, $text{'priv_title'}, "");
|
|
$conf = &get_config();
|
|
|
|
print "$text{'priv_desc'}<p>\n";
|
|
&start_form("save_priv.cgi", $text{'priv_header'});
|
|
|
|
print "<tr> <td><b>$text{'priv_white'}</b></td> <td colspan=3 nowrap>";
|
|
&opt_field("auto_whitelist_path", $x=&find("auto_whitelist_path", $conf), 40,
|
|
"~/.spamassassin/auto-whitelist");
|
|
print "</td> </tr>\n";
|
|
|
|
print "<tr> <td><b>$text{'priv_mode'}</b></td> <td nowrap>";
|
|
&opt_field("auto_whitelist_file_mode", $x=&find("auto_whitelist_file_mode", $conf), 4,
|
|
"0700");
|
|
print "</td> </tr>\n";
|
|
|
|
print "<tr> <td><b>$text{'priv_dcc'}</b></td> <td nowrap>";
|
|
&opt_field("dcc_options", $x=&find("dcc_options", $conf), 10, "-R");
|
|
print "</td> </tr>\n";
|
|
|
|
print "<tr> <td><b>$text{'priv_log'}</b></td> <td colspan=3 nowrap>";
|
|
&opt_field("timelog_path", $x=&find("timelog_path", $conf), 40, "NULL");
|
|
print "</td> </tr>\n";
|
|
|
|
print "<tr> <td><b>$text{'priv_razor'}</b></td> <td colspan=3 nowrap>";
|
|
&opt_field("razor_config", $x=&find("razor_config", $conf), 40, "~/razor.conf");
|
|
print "</td> </tr>\n";
|
|
|
|
&end_form(undef, $text{'save'});
|
|
&ui_print_footer("", $text{'index_return'});
|
|
|
|
|