summaryrefslogtreecommitdiff
path: root/lib/VNDB/Util/FormHTML.pm
diff options
context:
space:
mode:
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 b6b7f57b..80b8c4f3 100644
--- a/lib/VNDB/Util/FormHTML.pm
+++ b/lib/VNDB/Util/FormHTML.pm
@@ -211,7 +211,7 @@ sub htmlForm {
if(@subs > 2) {
ul class => 'maintabs notfirst', id => 'jt_select';
for (0..$#subs/2) {
- (my $short = lc $subs[$_*2]) =~ s/[^\w\d]+/_/;
+ (my $short = lc $subs[$_*2]) =~ s/[^\w\d]+/_/g;
li class => 'left';
a href => "#$short", id => "jt_sel_$short", $subs[$_*2];
end;
@@ -222,7 +222,7 @@ sub htmlForm {
# form subs
while(my($name, $parts) = (shift(@subs), shift(@subs))) {
last if !$name || !$parts;
- (my $short = lc $name) =~ s/[^\w\d]+/_/;
+ (my $short = lc $name) =~ s/[^\w\d]+/_/g;
div class => 'mainbox', id => 'jt_box_'.$short;
h1 $name;
fieldset;