[devscripts] 03/04: Ensure all LWP-using scripts honor a proxy set in the environment.

[James McCoy]

This is an automated email from the git hooks/post-receive script.

jamessan pushed a commit to branch master
in repository devscripts.

commit 950fcab1ab7387f8798a26a13b870bf6bb58d7b8
Author: James McCoy <jamessan at debian.org>
Date:   Sat Apr 25 21:42:59 2015 -0400

    Ensure all LWP-using scripts honor a proxy set in the environment.
    
    Closes: #781611
    Signed-off-by: James McCoy <jamessan at debian.org>
---
 debian/changelog    | 2 ++
 scripts/dcontrol.pl | 1 +
 scripts/debsnap.pl  | 1 +
 3 files changed, 4 insertions(+)

diff --git a/debian/changelog b/debian/changelog
index 780407b..5a6c1c2 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -40,6 +40,8 @@ devscripts (2.15.4) UNRELEASED; urgency=medium
       via the redirector.  (Closes: #778860)
     + Let the OS assign a port to the test's HTTP server so tests don't fail
       when something is already using port 8000.
+  * Ensure all LWP-using scripts honor a proxy set in the environment.
+    (Closes: #781611)
 
   [ Johannes Schauer ]
   * chdist: Also set Apt::Architectures to prevent foreign architectures from
diff --git a/scripts/dcontrol.pl b/scripts/dcontrol.pl
index d817937..8767923 100755
--- a/scripts/dcontrol.pl
+++ b/scripts/dcontrol.pl
@@ -53,6 +53,7 @@ my $dcontrol_url;
 my $opt;
 
 my $ua = LWP::UserAgent->new(agent => "$progname ###VERSION###");
+$ua->env_proxy();
 
 # functions
 
diff --git a/scripts/debsnap.pl b/scripts/debsnap.pl
index 8800e37..c6b07e3 100755
--- a/scripts/debsnap.pl
+++ b/scripts/debsnap.pl
@@ -31,6 +31,7 @@ eval {
     require LWP::UserAgent;
     no warnings;
     $LWP::Simple::ua = LWP::UserAgent->new(agent => 'LWP::UserAgent/Devscripts/###VERSION###');
+    $LWP::Simple::ua->env_proxy();
 };
 if ($@) {
     if ($@ =~ m/Can\'t locate LWP/) {

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/collab-maint/devscripts.git