#!/usr/local/bin/perl # # postfix-module by Guillaume Cottenceau , # for webmin by Jamie Cameron # # Copyright (c) 2000 by Mandrakesoft # # Permission to use, copy, modify, and distribute this software and its # documentation under the terms of the GNU General Public License is hereby # granted. No representations are made about the suitability of this software # for any purpose. It is provided "as is" without express or implied warranty. # See the GNU General Public License for more details. # # # Save Postfix options ; special because for virtual tables require './postfix-lib.pl'; &ReadParse(); $access{'header'} || &error($text{'header_ecannot'}); &error_setup($text{'opts_err'}); &lock_postfix_files(); &before_save(); $in{'header_checks'} =~ /^(regexp|pcre):\/\S+$/ || &error($text{'header_eregexp'}); &save_options(\%in); &ensure_map("header_checks"); &after_save(); &unlock_postfix_files(); ®enerate_header_table(); &reload_postfix(); &webmin_log("header"); &redirect("");