diff options
| author | Christopher Burger <burgerc@freeside.biz> | 2018-09-28 09:58:50 -0400 |
|---|---|---|
| committer | Christopher Burger <burgerc@freeside.biz> | 2018-09-28 09:58:50 -0400 |
| commit | 8fe6c833babe44bb707b8c47273b04fe39edfbaf (patch) | |
| tree | 64246f50234a553e4b4612c9f9f2ad20793ad191 | |
| parent | 9e9168c1e83f5e33e3a09299a3e72d0d9ae7a237 (diff) | |
| parent | 188400e69d8d95f73ca5ab7be89254617270dd75 (diff) | |
Merge branch 'master' of ssh://git.freeside.biz/home/git/freeside
| -rw-r--r-- | FS/FS/pay_batch/paymentech.pm | 8 | ||||
| -rwxr-xr-x | FS/bin/freeside-paymentech-download | 2 | ||||
| -rwxr-xr-x | FS/bin/freeside-paymentech-upload | 2 |
3 files changed, 4 insertions, 8 deletions
diff --git a/FS/FS/pay_batch/paymentech.pm b/FS/FS/pay_batch/paymentech.pm index bb2c2588d..094d50114 100644 --- a/FS/FS/pay_batch/paymentech.pm +++ b/FS/FS/pay_batch/paymentech.pm @@ -67,12 +67,8 @@ my $gateway; $hash->{'error_message'} = $hash->{'procStatusMessage'}; } }, - 'approved' => sub { my $hash = shift; - $hash->{'approvalStatus'} - }, - 'declined' => sub { my $hash = shift; - ! $hash->{'approvalStatus'} - }, + 'approved' => sub { shift->{'approvalStatus'} == 1 }, + 'declined' => sub { shift->{'approvalStatus'} != 1 }, ); my %paytype = ( diff --git a/FS/bin/freeside-paymentech-download b/FS/bin/freeside-paymentech-download index 9a1f609bc..4d99df2d0 100755 --- a/FS/bin/freeside-paymentech-download +++ b/FS/bin/freeside-paymentech-download @@ -62,7 +62,7 @@ while ($ssh_retry > 0) { $sftp = Net::SFTP::Foreign->new( host => $host, user => $username, password => $password, - timeout => 30, + timeout => 300, ); last unless $sftp->error; $ssh_retry -= 1; diff --git a/FS/bin/freeside-paymentech-upload b/FS/bin/freeside-paymentech-upload index 799e6c42c..770239d8d 100755 --- a/FS/bin/freeside-paymentech-upload +++ b/FS/bin/freeside-paymentech-upload @@ -97,7 +97,7 @@ while ($ssh_retry > 0) { $sftp = Net::SFTP::Foreign->new( host => $host, user => $username, password => $password, - timeout => 30, + timeout => 300, ); last unless $sftp->error; $ssh_retry -= 1; |