File: save_newlocal.cgi

package info (click to toggle)
webmin-virtual-server 2.50-1
  • links: PTS
  • area: main
  • in suites: sarge
  • size: 1,608 kB
  • ctags: 392
  • sloc: perl: 15,687; makefile: 95; sh: 8
file content (16 lines) | stat: -rwxr-xr-x 423 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
#!/usr/local/bin/perl
# save_newlocal.cgi
# Save the new local mailbox email

require './virtual-server-lib.pl';
&master_admin() || &error($text{'newlocal_ecannot'});
&ReadParseMime();
$file = $config{'local_template'};
$file = "$module_config_directory/local-template"
	if ($file eq "none" || $file eq 'default');

&parse_email_template($file, "newlocal_subject", "newlocal_cc");

&webmin_log("newlocal");
&redirect("");