diff options
| -rw-r--r-- | LinkPoint.pm | 6 |
1 files changed, 3 insertions, 3 deletions
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; |