← Back
Editing: save_opts_header.cgi
#!/usr/bin/perl # # postfix-module by Guillaume Cottenceau <gc@mandrakesoft.com>, # for webmin by Jamie Cameron # # Save Postfix options ; special because for virtual tables require './postfix-lib.pl'; ## no critic use strict; use warnings; our ($err, %access, %in, %text); &ReadParse(); $access{'header'} || &error($text{'header_ecannot'}); &error_setup($text{'opts_err'}); &lock_postfix_files(); &before_save(); $in{'header_checks_def'} || $in{'header_checks'} =~ /^(regexp|pcre):\/\S+$/ || &error($text{'header_eregexp'}); $in{'mime_header_checks_def'} || $in{'mime_header_checks'} =~ /^(regexp|pcre):\/\S+$/ || &error($text{'header_eregexp'}); &save_options(\%in); &ensure_map("header_checks"); &ensure_map("mime_header_checks"); &after_save(); &unlock_postfix_files(); ®enerate_header_table(); ®enerate_mime_header_table(); $err = &reload_postfix(); &error($err) if ($err); &webmin_log("header"); &redirect("");
Save File
Cancel