From b7c89634cd29d02e48767fbf177b5a66c4f4ad86 Mon Sep 17 00:00:00 2001 From: Jonathan Prykop Date: Tue, 7 Jun 2016 20:53:12 -0500 Subject: #42638: Update URLs for B::OP AuthorizeNet --- AuthorizeNet/AIM.pm | 4 ++-- AuthorizeNet/ARB.pm | 2 +- 2 files changed, 3 insertions(+), 3 deletions(-) (limited to 'AuthorizeNet') diff --git a/AuthorizeNet/AIM.pm b/AuthorizeNet/AIM.pm index 4a02514..e7ecd56 100644 --- a/AuthorizeNet/AIM.pm +++ b/AuthorizeNet/AIM.pm @@ -9,12 +9,12 @@ use Text::CSV_XS; use vars qw($VERSION @ISA @EXPORT @EXPORT_OK); @ISA = qw(Business::OnlinePayment::AuthorizeNet Business::OnlinePayment::HTTPS); -$VERSION = '3.23'; +$VERSION = '3.24'; sub set_defaults { my $self = shift; - $self->server('secure.authorize.net') unless $self->server; + $self->server('secure2.authorize.net') unless $self->server; $self->port('443') unless $self->port; $self->path('/gateway/transact.dll') unless $self->path; diff --git a/AuthorizeNet/ARB.pm b/AuthorizeNet/ARB.pm index cc8289b..43910a0 100644 --- a/AuthorizeNet/ARB.pm +++ b/AuthorizeNet/ARB.pm @@ -17,7 +17,7 @@ $me='Business::OnlinePayment::AuthorizeNet::ARB'; sub set_defaults { my $self = shift; - $self->server('api.authorize.net') unless $self->server; + $self->server('api2.authorize.net') unless $self->server; $self->port('443') unless $self->port; $self->path('/xml/v1/request.api') unless $self->path; -- cgit v1.2.1