use Business::CreditCard in cust_payby, #23741

diff --git a/FS/FS/cust_payby.pm b/FS/FS/cust_payby.pm
index 68c8245..5914ab5 100644 (file)
--- a/FS/FS/cust_payby.pm
+++ b/FS/FS/cust_payby.pm
@@ -6,6 +6,7 @@ use FS::UID;
 use FS::Record qw( qsearchs ); #qsearch;
 use FS::payby;
 use FS::cust_main;
+use Business::CreditCard qw( validate cardtype );
 
 use vars qw( $conf @encrypted_fields
              $ignore_expired_card $ignore_banned_card