| Subject: | Typo |
Hi,
There's a minor typo that was driving me crazy when all my tests were
failing. Patch attached.
Regards,
David.
| Subject: | html-form-force-value.diff |
diff -r -u HTML-Form-ForceValue-0.002-ORIG/lib/HTML/Form/ForceValue.pm HTML-Form-ForceValue-0.002/lib/HTML/Form/ForceValue.pm
--- HTML-Form-ForceValue-0.002-ORIG/lib/HTML/Form/ForceValue.pm 2006-08-09 16:29:42.000000000 -0400
+++ HTML-Form-ForceValue-0.002/lib/HTML/Form/ForceValue.pm 2006-08-15 12:52:41.000000000 -0400
@@ -67,7 +67,7 @@
my $old = $self->value;
eval { $self->value($value); };
if ($@ and $@ =~ /Illegal value/) {
- push @{$self->{menu}}, { name => $value, $value => $value };
+ push @{$self->{menu}}, { name => $value, value => $value };
return $self->value($value);
}
return $old;