[freeside-commits] freeside/FS/FS agent.pm,1.21,1.22

Ivan,,, ivan at wavetail.420.am
Fri Oct 23 17:16:29 PDT 2009


Update of /home/cvs/cvsroot/freeside/FS/FS
In directory wavetail.420.am:/tmp/cvs-serv25631

Modified Files:
	agent.pm 
Log Message:
eliminate warnings from Business::CreditCard about being passed an empty number

Index: agent.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/agent.pm,v
retrieving revision 1.21
retrieving revision 1.22
diff -u -d -r1.21 -r1.22
--- agent.pm	25 Jun 2009 19:47:47 -0000	1.21
+++ agent.pm	24 Oct 2009 00:16:27 -0000	1.22
@@ -247,7 +247,7 @@
 
   #look for an agent gateway override first
   my $cardtype;
-  if ( $options{method} && $options{method} eq 'CC' ) {
+  if ( $options{method} && $options{method} eq 'CC' && $options{payinfo} ) {
     $cardtype = cardtype($options{payinfo});
   } elsif ( $options{method} && $options{method} eq 'ECHECK' ) {
     $cardtype = 'ACH';



More information about the freeside-commits mailing list