diff options
| author | jeff <jeff> | 2007-05-15 02:36:14 +0000 |
|---|---|---|
| committer | jeff <jeff> | 2007-05-15 02:36:14 +0000 |
| commit | b84e69be37314917a10e50f6db95441d04bcb6a3 (patch) | |
| tree | 9c68962a45792b0ef36932b265983a0399ee54a7 | |
| parent | 39af7e54f1c6cc068ba7d980d7ababdb88d8ae68 (diff) | |
default to CARD with no payby from selfservice
| -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 9ee770b20..7a83ecee2 100644 --- a/FS/FS/ClientAPI/MyAccount.pm +++ b/FS/FS/ClientAPI/MyAccount.pm @@ -322,6 +322,7 @@ sub process_payment { or return { 'error' => gettext('illegal_text'). " paybatch: ". $p->{'paybatch'} }; my $paybatch = $1; + $p->{'payby'} = 'CARD' unless exists($p->{'payby'}); $p->{'payby'} =~ /^([A-Z]{4})$/ or return { 'error' => "illegal_payby " . $p->{'payby'} }; my $payby = $1; |