X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=LinkPoint.pm;h=bde5543b5aa080f63c85a66dfe930233b0e3adbd;hb=64714b3e4e50fc336eb7cd9221e00be685d8cab6;hp=6943ba673013f9ef9d3f9416bb4087a35de00f48;hpb=d3717f864dfd884cdc8d4bea75c61d73a4d6064c;p=Business-OnlinePayment-LinkPoint.git diff --git a/LinkPoint.pm b/LinkPoint.pm index 6943ba6..bde5543 100644 --- a/LinkPoint.pm +++ b/LinkPoint.pm @@ -1,6 +1,6 @@ package Business::OnlinePayment::LinkPoint; -# $Id: LinkPoint.pm,v 1.13 2004-06-24 14:54:31 ivan Exp $ +# $Id: LinkPoint.pm,v 1.14 2004-06-24 14:55:12 ivan Exp $ use strict; use vars qw($VERSION @ISA @EXPORT @EXPORT_OK); @@ -155,9 +155,9 @@ sub submit { $post_data{'order_type'} = $content{action}; - if ( $self->cvv2 ) { + if ( $content{'cvv2'} ) { $post_data{cvmindicator} = 'provided'; - $post_data{cvmvalue} = $self->cvv2; + $post_data{cvmvalue} = $content{'cvv2'}; } warn "$_ => $post_data{$_}\n" foreach keys %post_data;