Permalink
Browse files

$ENV{HTTP_PROXY} might override our test setup [RT#81381]

  • Loading branch information...
1 parent 98e8aba commit a87c28123254c9b38bee602d603f76715b3e8d52 @gisle committed Dec 19, 2012
Showing with 2 additions and 0 deletions.
  1. +2 −0 t/base/ua.t
View
@@ -94,6 +94,8 @@ ok($ua->ssl_opts("verify_hostname"), 0);
$ua = LWP::UserAgent->new(ssl_opts => { verify_hostname => 1 });
ok($ua->ssl_opts("verify_hostname"), 1);
+delete @ENV{grep /_proxy$/i, keys %ENV}; # clean out any proxy vars
+
$ENV{http_proxy} = "http://example.com";
$ua = LWP::UserAgent->new;
ok($ua->proxy('http'), undef);

0 comments on commit a87c281

Please sign in to comment.