From: Andrew Dunstan Date: Mon, 7 Nov 2011 16:24:51 +0000 (-0800) Subject: Make soap client work. X-Git-Url: https://git.exim.org/buildfarm-server.git/commitdiff_plain/6ec66ba06428bd583284bf589214813f2b925f1d Make soap client work. --- diff --git a/cgi-bin/get_bf_status_soap.pl b/cgi-bin/get_bf_status_soap.pl index f7772fa..7815207 100755 --- a/cgi-bin/get_bf_status_soap.pl +++ b/cgi-bin/get_bf_status_soap.pl @@ -8,12 +8,11 @@ See accompanying License file for license details =cut -use SOAP::Lite +trace; +use SOAP::Lite ; my $obj = SOAP::Lite ->uri('http://www.pgbuildfarm.org/PGBuildFarm') - ->proxy('http://127.0.0.1/cgi-bin/show_status_soap.pl') - ->request->header("Host" => "www.pgbuildfarm.org") + ->proxy('http://www.pgbuildfarm.org/cgi-bin/show_status_soap.pl') ; my $data = $obj->get_status->result;