diff options
author | ivan <ivan> | 2004-06-24 14:55:12 +0000 |
---|---|---|
committer | ivan <ivan> | 2004-06-24 14:55:12 +0000 |
commit | 64714b3e4e50fc336eb7cd9221e00be685d8cab6 (patch) | |
tree | 92c6917a808abae6b7fa22724a61ca1d9e30a131 /LinkPoint.pm | |
parent | d3717f864dfd884cdc8d4bea75c61d73a4d6064c (diff) |
and fix cvv2 and
Diffstat (limited to 'LinkPoint.pm')
-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; |