X-Git-Url: http://git.freeside.biz/gitweb/?p=Business-BatchPayment-BillBuddy.git;a=blobdiff_plain;f=BillBuddy.pm;fp=BillBuddy.pm;h=72b5afe74813bdfae5d97a9954e79d0b64e06f34;hp=de2131cfc2e83c3da23074b71f1d5511a7670dfc;hb=4c88e382c90c09b065ef680f34fc8f8e56748685;hpb=a950ac254a964a63d4eea3a3de0c8ed6d1b0470c

diff --git a/BillBuddy.pm b/BillBuddy.pm
index de2131c..72b5afe 100644
--- a/BillBuddy.pm
+++ b/BillBuddy.pm
@@ -259,10 +259,11 @@ sub xmlrpc_post {
   my $xmlcontent = $self->xml_format($sid,@param);
   warn $self->host . ' ' . $self->port . ' ' . $path . "\n" . $xmlcontent if $self->debug;
   my ($response, $rcode, %rheaders) = $self->https_post($path,$xmlcontent);
-  die "Bad response from gateway: $rcode" unless $rcode eq '200 OK';
+  die "Bad response from gateway: $rcode\n" unless $rcode eq '200 OK';
   warn $response . "\n" if $self->debug;
   my $rref = XMLin($response, KeyAttr => ['ResponseData'], ForceArray => []);
-  die "Error from gateway: " . $rref->{'ResponseStatusDescription'} if $rref->{'ResponseStatus'};
+  die "Error from gateway: " . $rref->{'ResponseStatusDescription'}. "\n"
+    if $rref->{'ResponseStatus'};
   return $rref;
 }