[SCM] Debian packaging of libbusiness-onlinepayment-ippay-perl branch, master, updated. f65741dbf79bdca696bb34579a220ac406dff032

[gregor herrmann]

The following commit has been merged in the master branch:
commit d47a776e936c933740f5a689fec40d9ef1e5e1f1
Author: gregor herrmann <gregoa at debian.org>
Date:   Tue Oct 30 18:06:17 2012 +0100

    Drop patch gateway.patch, included in 0.07.

diff --git a/debian/patches/gateway.patch b/debian/patches/gateway.patch
deleted file mode 100644
index c47bd71..0000000
--- a/debian/patches/gateway.patch
+++ /dev/null
@@ -1,89 +0,0 @@
-Description: IPPay changed the gateway's server name and path, and will soon
- turn off the old gateway
-Origin: https://www.freeside.biz/gitweb/?p=Business-OnlinePayment-IPPay.git;a=commitdiff;h=1f19e67636476c7119cfb41920c5b176e617c697
-Bug-Debian: #691723
-Author: Ivan Kohler <ivan-debian at 420.am>
-Reviewed-by: gregor herrmann <gregoa at debian.org>
-Last-Update: 2012-10-30
-Applied-Upstream: yes, 0.07
-
---- a/IPPay.pm
-+++ b/IPPay.pm
-@@ -45,9 +45,9 @@
-     my %opts = @_;
- 
-     # standard B::OP methods/data
--    $self->server('gateway17.jetpay.com') unless $self->server;
-+    $self->server('gtwy.ippay.com') unless $self->server;
-     $self->port('443') unless $self->port;
--    $self->path('/jetpay') unless $self->path;
-+    $self->path('/ippay') unless $self->path;
- 
-     $self->build_subs(qw( order_number avs_code cvv2_response
-                           response_page response_code response_headers
-@@ -209,6 +209,9 @@
-   foreach ( keys ( %{($self->{_defaults})} ) ) {
-     $content{$_} = $self->{_defaults}->{$_} unless exists($content{$_});
-   }
-+  if ($self->test_transaction()) {
-+    $content{'login'} = 'TESTTERMINAL';
-+  }
-   $self->content(%content);
- 
-   $self->required_fields(@required_fields);
-@@ -221,12 +224,6 @@
-     }
-   }
- 
--  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);
-@@ -391,7 +388,7 @@
-     if (  exists($response->{ActionCode}) && !exists($response->{ErrMsg})) {
-       $self->error_message($response->{ResponseText});
-     }else{
--      $self->error_message($response->{Errmsg});
-+      $self->error_message($response->{ErrMsg});
-     }
- #  }else{
- #    $self->error_message("Server Failed");
-@@ -588,6 +585,9 @@
- 
- =head1 COMPATIBILITY
- 
-+Debian version 0.06-2 (upstream version 0.07) changes the server name and path
-+for IPPay's late 2012 update.
-+
- Business::OnlinePayment::IPPay uses IPPay XML Product Specifications version
- 1.1.2.
- 
---- a/t/card.t
-+++ b/t/card.t
-@@ -61,8 +61,8 @@
-     $tx,
-     desc          => "invalid card_number",
-     is_success    => 0,
--    result_code   => '912',
--    error_message => 'INVALID CARD NUMBER',
-+    result_code   => '900', #'912' with old jetpay gw
-+    error_message => 'Invalid card number.  ', #'INVALID CARD NUMBER' w/old gw
-     authorization => qr/^$/,
-     avs_code      => '',           # so rather pointless :\
-     cvv2_response => '',           # ...
---- a/t/lib/test_account.pl
-+++ b/t/lib/test_account.pl
-@@ -12,7 +12,7 @@
- sub test_account {
-     my $suffix = shift || 'card';
- 
--    my($login, $password) = ('TESTMERCHANT', '');
-+    my($login, $password) = ('TESTTERMINAL', '');
- 
-     my %opt;
-     if ( $suffix eq 'check ' ) {
diff --git a/debian/patches/series b/debian/patches/series
index a5dd937..9fe8b1a 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1,2 +1 @@
 no-connectivity.patch
-gateway.patch

-- 
Debian packaging of libbusiness-onlinepayment-ippay-perl