From: ivan <ivan>
Date: Wed, 15 Apr 2009 02:44:11 +0000 (+0000)
Subject: fix 1.7->1.9 upgrade glitch with self-service where process_payment required "payby... 
X-Git-Tag: root_of_svc_elec_features~1270
X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=commitdiff_plain;h=48fdda923dd0c3227190da57ad0fca704725fb43

fix 1.7->1.9 upgrade glitch with self-service where process_payment required "payby" instead of defaulting to CARD, RT#3905
---

diff --git a/FS/FS/ClientAPI/MyAccount.pm b/FS/FS/ClientAPI/MyAccount.pm
index 564acb1a6..d64c72c0e 100644
--- a/FS/FS/ClientAPI/MyAccount.pm
+++ b/FS/FS/ClientAPI/MyAccount.pm
@@ -451,6 +451,7 @@ sub process_payment {
     or return { 'error' => gettext('illegal_text'). " paybatch: ". $p->{'paybatch'} };
   my $paybatch = $1;
 
+  $p->{'payby'} ||= 'CARD';
   $p->{'payby'} =~ /^([A-Z]{4})$/
     or return { 'error' => "illegal_payby " . $p->{'payby'} };
   my $payby = $1;