Speed up history queries

[buildfarm-server.git] / cgi-bin / get_bf_status_soap.pl

diff --git a/cgi-bin/get_bf_status_soap.pl b/cgi-bin/get_bf_status_soap.pl
index 02059e7d84e77eaf17480fe401118c7eb5ef7fac..78152073f4b8a0141391a4f870b6d48fa54110a6 100755 (executable)
--- a/cgi-bin/get_bf_status_soap.pl
+++ b/cgi-bin/get_bf_status_soap.pl
@@ -1,13 +1,18 @@
 #!/usr/bin/perl
 
 #!/usr/bin/perl
 

-use lib "/home/community/pgbuildfarm/lib/lib/perl5/site_perl";
+=comment

 
 

-use SOAP::Lite +trace;
+Copyright (c) 2003-2010, Andrew Dunstan
+
+See accompanying License file for license details
+
+=cut 
+
+use SOAP::Lite ;

 
 my $obj = SOAP::Lite
     ->uri('http://www.pgbuildfarm.org/PGBuildFarm')
 
 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;
     ;
 
 my $data = $obj->get_status->result;