Bug in HTML::Form 0.03
BooK (book@netcourrier.com)
Mon, 12 Mar 2001 00:57:05 +0100 (CET)
Hi,
I am new to this list, to which I subscribed because of the following:
the "action" method from HTML::Form has no effect when used to set the
value of the action. I am using HTML::Form 0.03, which I just downloaded
from CPAN.
Here's a patch to correct what seems to be a typo.
--- Form.pm.old Mon Mar 12 00:40:43 2001
+++ Form.pm Mon Mar 12 00:41:07 2001
@@ -185,7 +185,7 @@
*{$m} = sub {
my $self = shift;
my $old = $self->{$m};
- $self->{$m} = shift if $@;
+ $self->{$m} = shift if @_;
$old;
};
}
Regards,
Philippe Bruhat
------------------------------------------------------------------------------
Philippe BRUHAT - BooK
Your reputation is what you make of it... and what you choose to take with
you. (Moral from Groo The Wanderer #48 (Epic))