michael/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2026-03-20 08:40:24 +00:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Revert "Fux subs to use local variable for parameters #2597"

Browse Source 
This reverts commit 1e6611ade5.
This commit is contained in:
Jamie Cameron
2025-12-02 05:32:33 -08:00
parent 1e6611ade5
commit 3b06c4dccb
1 changed files with 11 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

30
proftpd/mod_tls.pl
View File

@@ -13,9 +13,8 @@ return &make_directives($rv, $_[0], "mod_tls");
sub edit_TLSEngine
{
my ($p) = grep { defined $_} @_;
return (2, $text{'mod_tls_engine'},
&choice_input($p->{'value'}, "TLSEngine", "",
&choice_input($_[0]->{'value'}, "TLSEngine", "",
"$text{'yes'},on", "$text{'no'},off",
"$text{'default'},"));
}
@@ -26,9 +25,8 @@ return &parse_choice("TLSEngine", "");
sub edit_TLSRequired
{
my ($p) = grep { defined $_} @_;
return (2, $text{'mod_tls_required'},
&select_input($p->{'value'}, "TLSRequired", "",
&select_input($_[0]->{'value'}, "TLSRequired", "",
"$text{'yes'},on", "$text{'no'},off",
"$text{'mod_tls_ctrl'},ctrl",
"$text{'mod_tls_auth'},auth",
@@ -42,16 +40,14 @@ return &parse_choice("TLSRequired", "");
sub edit_TLSRSACertificateFile
{
my ($p) = grep { defined $_} @_;
my $n = $p->{'name'};
my $n = $_[0]->{'name'};
return (2, $text{'mod_tls_file'},
&ui_opt_textbox($n, $p->{'value'}, 60, $text{'mod_tls_none'})." ".
&ui_opt_textbox($n, $_[0]->{'value'}, 60, $text{'mod_tls_none'})." ".
&file_chooser_button($n));
}
sub save_TLSRSACertificateFile
{
my ($p) = grep { defined $_} @_;
my $n = $p->{'name'};
my $n = $_[0]->{'name'};
if ($in{$n."_def"}) {
return ( [ ] );
}
@@ -63,16 +59,14 @@ else {
sub edit_TLSRSACertificateKeyFile
{
my ($p) = grep { defined $_} @_;
my $n = $p->{'name'};
my $n = $_[0]->{'name'};
return (2, $text{'mod_tls_key'},
&ui_opt_textbox($n, $p->{'value'}, 60, $text{'mod_tls_none'})." ".
&ui_opt_textbox($n, $_[0]->{'value'}, 60, $text{'mod_tls_none'})." ".
&file_chooser_button($n));
}
sub save_TLSRSACertificateKeyFile
{
my ($p) = grep { defined $_} @_;
my $n = $p->{'name'};
my $n = $_[0]->{'name'};
if ($in{$n."_def"}) {
return ( [ ] );
}
@@ -84,16 +78,14 @@ else {
sub edit_TLSCACertificateFile
{
my ($p) = grep { defined $_} @_;
my $n = $p->{'name'};
my $n = $_[0]->{'name'};
return (2, $text{'mod_tls_ca'},
&ui_opt_textbox($n, $p->{'value'}, 60, $text{'mod_tls_none'})." ".
&ui_opt_textbox($n, $_[0]->{'value'}, 60, $text{'mod_tls_none'})." ".
&file_chooser_button($n));
}
sub save_TLSCACertificateFile
{
my ($p) = grep { defined $_} @_;
my $n = $p->{'name'};
my $n = $_[0]->{'name'};
if ($in{$n."_def"}) {
return ( [ ] );
}