correct default_ns for non-USD/CAD transactions, RT#26568

[Business-OnlinePayment-IATSPayments.git] / lib / Business / OnlinePayment / IATSPayments.pm

diff --git a/lib/Business/OnlinePayment/IATSPayments.pm b/lib/Business/OnlinePayment/IATSPayments.pm
index cb5eda3..8bc3d78 100644 (file)
--- a/lib/Business/OnlinePayment/IATSPayments.pm
+++ b/lib/Business/OnlinePayment/IATSPayments.pm
@@ -8,7 +8,7 @@ use Business::CreditCard;
 use SOAP::Lite;
 #SOAP::Lite->import(+trace=>'debug');
 
-our $VERSION = '0.02';
+our $VERSION = '0.03_01';
 $VERSION = eval $VERSION; # modperlstyle: convert the string into a number
 
 sub _info {
@@ -221,6 +221,9 @@ sub submit {
 
   my $uri = $base_uri. "ProcessLink.asmx?op=$action";
 
+  # never "uk.iatspayments.com"
+  my $default_ns = 'https://www.iatspayments.com/NetGate/';
+
   my %data = map { $_ => $content{$_} } (qw(
     agentCode
     password
@@ -268,7 +271,7 @@ sub submit {
 
   my $result = SOAP::Lite
                  ->proxy($uri)
-                 ->default_ns($base_uri)
+                 ->default_ns($default_ns)
                  #->on_action( sub { join '/', @_ } )
                  ->on_action( sub { join '', @_ } )
                  ->autotype(0)