<paravoid> you're right
<paravoid> I can't explain it <paravoid> but it's definitely fixing it <paravoid> I triple-checked...master
parent
a9508d6ba8
commit
06ffcb399d
|
@ -103,6 +103,8 @@ sub cgi_signin ($$) { #{{{
|
||||||
stylesheet => styleurl(),
|
stylesheet => styleurl(),
|
||||||
);
|
);
|
||||||
|
|
||||||
|
decode_form_utf8($form);
|
||||||
|
|
||||||
$form->field(name => "name", required => 0);
|
$form->field(name => "name", required => 0);
|
||||||
$form->field(name => "do", type => "hidden");
|
$form->field(name => "do", type => "hidden");
|
||||||
$form->field(name => "page", type => "hidden");
|
$form->field(name => "page", type => "hidden");
|
||||||
|
@ -117,8 +119,6 @@ sub cgi_signin ($$) { #{{{
|
||||||
}
|
}
|
||||||
|
|
||||||
if ($form->submitted) {
|
if ($form->submitted) {
|
||||||
decode_form_utf8($form);
|
|
||||||
|
|
||||||
# Set required fields based on how form was submitted.
|
# Set required fields based on how form was submitted.
|
||||||
my %required=(
|
my %required=(
|
||||||
"Login" => [qw(name password)],
|
"Login" => [qw(name password)],
|
||||||
|
|
Loading…
Reference in New Issue