From f906e025db83611062d08aaa3c27f60309aed153 Mon Sep 17 00:00:00 2001
From: Daouda Lo <daouda@mandriva.com>
Date: Tue, 20 Sep 2005 16:55:07 +0000
Subject: - declare is_proxy before calling it

---
 mdkonline.pm | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/mdkonline.pm b/mdkonline.pm
index cf35a8d7..be9ce8e4 100644
--- a/mdkonline.pm
+++ b/mdkonline.pm
@@ -23,12 +23,12 @@ my $onlineProxy = 'https://onine.mandriva.com/soap';
 
 my $useragent = set_ua('mdkonline');
 
-my $s = is_proxy() ? SOAP::Lite->uri($uri)->proxy($serviceProxy, proxy => [ 'http' => $ENV{http_proxy} ], agent => $useragent) : SOAP::Lite->uri($uri)->proxy($serviceProxy, agent => $useragent);
-
 sub is_proxy () {
     return 1 if defined $ENV{http_proxy};
 }
 
+my $s = is_proxy() ? SOAP::Lite->uri($uri)->proxy($serviceProxy, proxy => [ 'http' => $ENV{http_proxy} ], agent => $useragent) : SOAP::Lite->uri($uri)->proxy($serviceProxy, agent => $useragent);
+
 sub md5file {
     require Digest::MD5;
     my @md5 = map {
-- 
cgit v1.2.1