CVS: blootbot/src/Modules babel.pl,1.9,1.10

[Tim R. <tim...@us...>]

Update of /cvsroot/blootbot/blootbot/src/Modules
In directory sc8-pr-cvs1:/tmp/cvs-serv25320/src/Modules

Modified Files:
	babel.pl 
Log Message:
proxy

Index: babel.pl
===================================================================
RCS file: /cvsroot/blootbot/blootbot/src/Modules/babel.pl,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -r1.9 -r1.10
--- babel.pl	22 Nov 2002 23:57:24 -0000	1.9
+++ babel.pl	22 Aug 2003 00:59:01 -0000	1.10
@@ -59,6 +59,7 @@
   $to = $lang_code{$to};
 
   my $ua = new LWP::UserAgent;
+  $ua->proxy('http', $::param{'httpProxy'}) if (&::IsParam("httpProxy"));
   $ua->agent("Mozilla/4.5 " . $ua->agent);        # Let's pretend
   $ua->timeout(5);