diff options
author | jeff <jeff> | 2008-07-10 01:56:18 +0000 |
---|---|---|
committer | jeff <jeff> | 2008-07-10 01:56:18 +0000 |
commit | 48245dae6481e1b6e2e9a3a27dca75d8c03fbc7c (patch) | |
tree | 9b9d341919ffb813953fe449136d696d568da9c4 /IPPay.pm | |
parent | 98c39a0ae9692556bf567e5f9cb8cc06f9393510 (diff) |
use same server for transaction id as transaction itself
Diffstat (limited to 'IPPay.pm')
-rw-r--r-- | IPPay.pm | 12 |
1 files changed, 6 insertions, 6 deletions
@@ -187,6 +187,12 @@ sub submit { $self->required_fields(@required_fields); + if ($self->test_transaction()) { + $self->server('test1.jetpay.com'); + $self->port('443'); + $self->path('/jetpay'); + } + my $transaction_id = $content{'order_number'}; unless ($transaction_id) { my ($page, $server_response, %headers) = $self->https_get('dummy' => 1); @@ -316,12 +322,6 @@ sub submit { $writer->endTag('JetPay'); $writer->end(); - if ($self->test_transaction()) { - $self->server('test1.jetpay.com'); - $self->port('443'); - $self->path('/jetpay'); - } - warn "$post_data\n" if $DEBUG; my ($page,$server_response,%headers) = $self->https_post($post_data); |