might as well use proxy if we have one

git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@807 c11ca15a-4712-0410-83d8-924469b57eb5

diff --git a/src/Modules/BZFlag.pl b/src/Modules/BZFlag.pl
index e0ca993599da2dc88cf7b18db7a1f898784137e2..1ef0887d92b573c923e48abbc3534057d2dc01b3 100755 (executable)
--- a/src/Modules/BZFlag.pl
+++ b/src/Modules/BZFlag.pl
@@ -43,6 +43,7 @@ sub BZFlag::BZFlag {
 sub BZFlag::list {
        my ($response);
        my $ua = new LWP::UserAgent;
+       $ua->proxy('http', $::param{'httpProxy'}) if (&::IsParam("httpProxy"));
 
        $ua->timeout(5);