summaryrefslogtreecommitdiff
path: root/lib/VNDB/Util/FormHTML.pm
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2008-11-13 18:19:41 +0100
committerYorhel <git@yorhel.nl>2008-11-13 18:19:41 +0100
commit216d48f964896b6e9a29424f0d5c2c95a2e7f559 (patch)
treed7bba64e23d122885454c04e7fe03071abb5fd40 /lib/VNDB/Util/FormHTML.pm
parentb228de9cd174756aefdf90db1d04a0643f7d7d8b (diff)
Automatically fill out the producer edit form, added form validation
Diffstat (limited to 'lib/VNDB/Util/FormHTML.pm')
-rw-r--r--lib/VNDB/Util/FormHTML.pm8
1 files changed, 7 insertions, 1 deletions
diff --git a/lib/VNDB/Util/FormHTML.pm b/lib/VNDB/Util/FormHTML.pm
index 54b916d9..c89a2338 100644
--- a/lib/VNDB/Util/FormHTML.pm
+++ b/lib/VNDB/Util/FormHTML.pm
@@ -15,6 +15,12 @@ my %formerr_names = (
usrpass => 'Password',
usrpass2 => 'Password (confirm)',
mail => 'Email',
+ type => 'Type',
+ name => 'Name',
+ original => 'Original',
+ lang => 'Language',
+ desc => 'Description',
+ editsum => 'Edit summary',
);
my %formerr_exeptions = (
login_failed => 'Invalid username or password',
@@ -134,7 +140,7 @@ sub htmlFormPart {
}
if(/select/) {
Select name => $o{short}, id => $o{short};
- option value => $_->[0], $frm->{$o{short}}||'' eq $_->[0] ? (selected => 'selected') : (), $_->[1]
+ option value => $_->[0], ($frm->{$o{short}}||'') eq $_->[0] ? (selected => 'selected') : (), $_->[1]
for @{$o{options}};
end;
}