1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
|
#!/usr/local/bin/perl
# edit_newlocal.cgi
# Display the current new local user email
require './virtual-server-lib.pl';
&master_admin() || &error($text{'newlocal_ecannot'});
&ui_print_header(undef, $text{'newlocal_title'}, "");
print "<form action=save_newlocal.cgi method=post enctype=multipart/form-data>\n";
$file = $config{'local_template'};
$file = "$module_config_directory/local-template"
if ($file eq "none" || $file eq "default");
print &text($config{'local_template'} eq "none" ?
'newlocal_descdis' : 'newlocal_desc', "<tt>$file</tt>"),"<p>\n";
$text{'sub_USER'} = $text{'sub_MAILBOX'};
$text{'sub_HOME'} = $text{'sub_LOCALHOME'};
&print_subs_table("USER", "FTP", "HOME");
print &email_template_input($file,
$config{'newlocal_subject'} || $text{'mail_usubject'},
$config{'newlocal_cc'});
print "<br>\n";
print "<input type=submit value='$text{'save'}'>\n";
print "<input type=reset value='$text{'newweb_undo'}'>\n";
print "</form>\n";
&ui_print_footer("", $text{'index_return'});
|
