Handle hostnames with upper-case letters
[webmin.git] / bandwidth / acl_security.pl
1
2 do 'bandwidth-lib.pl';
3
4 # acl_security_form(&options)
5 # Output HTML for editing security options for the acl module
6 sub acl_security_form
7 {
8 print "<tr> <td><b>$text{'acl_setup'}</b></td> <td>\n";
9 printf "<input type=radio name=setup value=1 %s> $text{'yes'}\n",
10         $o->{'setup'} ? 'checked' : '';
11 printf "<input type=radio name=setup value=0 %s> $text{'no'}</td> </tr>\n",
12         $o->{'setup'} ? '' : 'checked';
13 }
14
15 # acl_security_save(&options)
16 # Parse the form for security options for the acl module
17 sub acl_security_save
18 {
19 $_[0]->{'setup'} = $in{'setup'};
20 }
21