summaryrefslogtreecommitdiff
path: root/lib/VNDB/Util/FormHTML.pm
diff options
context:
space:
mode:
authorYorhel <git@yorhel.nl>2008-12-02 14:39:10 +0100
committerYorhel <git@yorhel.nl>2008-12-02 14:39:10 +0100
commit28c19f26f5355ef12d89fa92e636d90cbb2a5fff (patch)
tree5715e864594a3ccb5df1e971aed4e7b38e3035a2 /lib/VNDB/Util/FormHTML.pm
parent6e239dedaee9aa745a740aa60a2ac79b3715626a (diff)
Adding/editing releases
Using plain input boxes for the media, producers and VNs for debugging, these will be replaced with proper JS-powered forms.
Diffstat (limited to 'lib/VNDB/Util/FormHTML.pm')
-rw-r--r--lib/VNDB/Util/FormHTML.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/VNDB/Util/FormHTML.pm b/lib/VNDB/Util/FormHTML.pm
index fbc9b9fa..309b7e12 100644
--- a/lib/VNDB/Util/FormHTML.pm
+++ b/lib/VNDB/Util/FormHTML.pm
@@ -202,7 +202,7 @@ sub htmlForm {
if(@subs > 2) {
ul class => 'maintabs notfirst', id => 'jt_select';
for (0..$#subs/2) {
- (my $short = lc $subs[$_*2]) =~ s/ /_/;
+ (my $short = lc $subs[$_*2]) =~ s/[^\w\d]+/_/;
li class => 'left';
a href => "#$short", id => "jt_sel_$short", $subs[$_*2];
end;
@@ -213,7 +213,7 @@ sub htmlForm {
# form subs
while(my($name, $parts) = (shift(@subs), shift(@subs))) {
last if !$name || !$parts;
- (my $short = lc $name) =~ s/ /_/;
+ (my $short = lc $name) =~ s/[^\w\d]+/_/;
div class => 'mainbox', id => 'jt_box_'.$short;
h1 $name;
fieldset;