diff options
| author | ivan <ivan> | 2009-04-15 02:44:11 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2009-04-15 02:44:11 +0000 |
| commit | 48fdda923dd0c3227190da57ad0fca704725fb43 (patch) | |
| tree | d656bb29b42f2ced34b71ac9b94cec5b7cedfcb8 | |
| parent | 4cd4bc31a0ceb17ac9e8b0162450dd26f315a4fd (diff) | |
fix 1.7->1.9 upgrade glitch with self-service where process_payment required "payby" instead of defaulting to CARD, RT#3905
| -rw-r--r-- | FS/FS/ClientAPI/MyAccount.pm | 1 |
1 files changed, 1 insertions, 0 deletions
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; |