X-Git-Url: http://git.freeside.biz/gitweb/?p=Business-OnlinePayment-IPPay.git;a=blobdiff_plain;f=IPPay.pm;fp=IPPay.pm;h=3d1582d838b0d690f7c4ab480663d19a43b441f1;hp=f3960767eb2ce1399f936d245d80a0c44e8bbd04;hb=327f376d26a38ae2f1a02ca9a53fad43464b087b;hpb=c88c21a1313cf47b46d9bbd5d992a69e69974810 diff --git a/IPPay.pm b/IPPay.pm index f396076..3d1582d 100644 --- a/IPPay.pm +++ b/IPPay.pm @@ -11,7 +11,7 @@ use Business::OnlinePayment::HTTPS; use vars qw($VERSION $DEBUG @ISA $me); @ISA = qw(Business::OnlinePayment::HTTPS); -$VERSION = '0.09_01'; +$VERSION = '0.09_02'; $VERSION = eval $VERSION; # modperlstyle: convert the string into a number $DEBUG = 0; @@ -177,7 +177,7 @@ sub submit { $self->is_success(0); $self->map_fields(); - my @required_fields = qw(action login type); + my @required_fields = qw(action login password type); my $action = lc($self->{_content}->{action}); my $type = $self->transaction_type();