summaryrefslogtreecommitdiff
path: root/lib/VNDB/Handler/Users.pm
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2009-08-18 09:23:11 +0200
committerYorhel <git@yorhel.nl>2009-08-18 09:23:11 +0200
commit6be3db128ffa7c16ff4967ddf08a8577d9f25eaf (patch)
tree385184908592f267fe5e44e01f0d99353c18df66 /lib/VNDB/Handler/Users.pm
parente7a73f04525ad18b0bd2be8996431ecaf8eff330 (diff)
htmlForm(): Don't generate subform id from the title
The subform id is now passed to htmlForm() as first formpart item. This way the id won't change even if the title does, which will be the case with the interface translation.
Diffstat (limited to 'lib/VNDB/Handler/Users.pm')
-rw-r--r--lib/VNDB/Handler/Users.pm8
1 files changed, 4 insertions, 4 deletions
diff --git a/lib/VNDB/Handler/Users.pm b/lib/VNDB/Handler/Users.pm
index dbf9dee4..ff1d9695 100644
--- a/lib/VNDB/Handler/Users.pm
+++ b/lib/VNDB/Handler/Users.pm
@@ -150,7 +150,7 @@ sub login {
}
$self->htmlHeader(title => 'Login', noindex => 1);
- $self->htmlForm({ frm => $frm, action => '/u/login' }, Login => [
+ $self->htmlForm({ frm => $frm, action => '/u/login' }, login => [ 'Login',
[ input => name => 'Username', short => 'usrname' ],
[ static => content => '<a href="/u/register">No account yet?</a>' ],
[ passwd => name => 'Password', short => 'usrpass' ],
@@ -215,7 +215,7 @@ __
."Don't worry! Just give us the email address you used to register on VNDB,\n"
."and we'll send you a new password within a few minutes!";
end;
- $self->htmlForm({ frm => $frm, action => '/u/newpass' }, 'Reset Password' => [
+ $self->htmlForm({ frm => $frm, action => '/u/newpass' }, newpass => [ 'Reset Password',
[ input => name => 'Email', short => 'mail' ],
]);
$self->htmlFooter;
@@ -284,7 +284,7 @@ sub register {
end;
end;
- $self->htmlForm({ frm => $frm, action => '/u/register' }, 'New Account' => [
+ $self->htmlForm({ frm => $frm, action => '/u/register' }, register => [ 'New Account',
[ input => short => 'usrname', name => 'Username' ],
[ static => content => 'Requested username. Must be lowercase and can only consist of alphanumeric characters.' ],
[ input => short => 'mail', name => 'Email' ],
@@ -363,7 +363,7 @@ sub edit {
end;
end
}
- $self->htmlForm({ frm => $frm, action => "/u$uid/edit" }, $title => [
+ $self->htmlForm({ frm => $frm, action => "/u$uid/edit" }, useredit => [ $title,
[ part => title => 'General Info' ],
$self->authCan('usermod') ? (
[ input => short => 'usrname', name => 'Username' ],