postfix/save_opts_body.cgi

   1 #!/usr/local/bin/perl
   2 #
   3 # postfix-module by Guillaume Cottenceau <gc@mandrakesoft.com>,
   4 # for webmin by Jamie Cameron
   5 #
   6 # Save Postfix options ; special because for virtual tables
   7
   8
   9 require './postfix-lib.pl';
  10
  11 &ReadParse();
  12
  13
  14 $access{'body'} || &error($text{'body_ecannot'});
  15
  16
  17 &error_setup($text{'opts_err'});
  18
  19
  20 &lock_postfix_files();
  21 &before_save();
  22 $in{'body_checks'} =~ /^(regexp|pcre):\/\S+$/ ||
  23         &error($text{'body_eregexp'});
  24 &save_options(\%in);
  25 &ensure_map("body_checks");
  26 &after_save();
  27 &unlock_postfix_files();
  28
  29
  30 &regenerate_body_table();
  31
  32 &reload_postfix();
  33
  34 &webmin_log("body");
  35 &redirect("");
  36
  37
  38