From 6ec66ba06428bd583284bf589214813f2b925f1d Mon Sep 17 00:00:00 2001
From: Andrew Dunstan <andrew@dunslane.net>
Date: Mon, 7 Nov 2011 08:24:51 -0800
Subject: [PATCH] Make soap client work.

---
 cgi-bin/get_bf_status_soap.pl | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

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;
-- 
2.30.2