From 8e3d674d1fd4b4777d0ee2197e8b0ff771aac9d4 Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Tue, 2 Aug 2011 19:35:10 +0000
Subject: [PATCH] isracards from self-service, RT#13894

---
 FS/FS/ClientAPI/MyAccount.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/FS/FS/ClientAPI/MyAccount.pm b/FS/FS/ClientAPI/MyAccount.pm
index cf8e1cca5..6fa4c3d9e 100644
--- a/FS/FS/ClientAPI/MyAccount.pm
+++ b/FS/FS/ClientAPI/MyAccount.pm
@@ -673,7 +673,7 @@ sub process_payment {
       if $cust_main->paymask eq $payinfo;
 
     $payinfo =~ s/\D//g;
-    $payinfo =~ /^(\d{13,16})$/
+    $payinfo =~ /^(\d{13,16}|\d{8,9})$/
       or return { 'error' => gettext('invalid_card') }; # . ": ". $self->payinfo
     $payinfo = $1;
 
-- 
2.11.0