diff options
| author | Mark Wells <mark@freeside.biz> | 2013-04-25 14:45:49 -0700 |
|---|---|---|
| committer | Mark Wells <mark@freeside.biz> | 2013-04-25 14:46:10 -0700 |
| commit | a1a0800de7c69fe5ee414b79e408ceacd4a1c2c3 (patch) | |
| tree | 92589a379a7bd3925139779ad0b0d5cd55df6152 /fs_selfservice/FS-SelfService/cgi/selfservice.cgi | |
| parent | f3e0ac2b009c4edd5692cb587ff709dac2223ebe (diff) | |
changes to support PayPal, #22395
Diffstat (limited to 'fs_selfservice/FS-SelfService/cgi/selfservice.cgi')
| -rwxr-xr-x | fs_selfservice/FS-SelfService/cgi/selfservice.cgi | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi index f7fe308cf..40fe98af2 100755 --- a/fs_selfservice/FS-SelfService/cgi/selfservice.cgi +++ b/fs_selfservice/FS-SelfService/cgi/selfservice.cgi @@ -667,12 +667,15 @@ sub make_thirdparty_payment { } sub post_thirdparty_payment { - $cgi->param('payby_method') =~ /^(CC|ECHECK)$/ + $cgi->param('payby_method') =~ /^(CC|ECHECK|PAYPAL)$/ or die "illegal payby method"; my $method = $1; $cgi->param('amount') =~ /^(\d+(\.\d*)?)$/ or die "illegal amount"; my $amount = $1; + # realtime_collect() returns the result from FS::cust_main->realtime_collect + # which returns realtime_bop() + # which returns a hashref of popup_url, collectitems, and reference my $result = realtime_collect( 'session_id' => $session_id, 'method' => $method, |