03/03: tests: Prevent 'http_proxy' from breaking Web server tests.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guix.

commit c74f0cb2b871f59466e6fbfbc954d8fc1cbc3c9c
Author: Ludovic Courtès <address@hidden>
Date:   Thu Jan 21 23:45:52 2016 +0100

    tests: Prevent 'http_proxy' from breaking Web server tests.
    
    * tests/lint.scm: Add call to 'unsetenv' to remove 'http_proxy'.
    * tests/publish.scm: Likewise.
---
 tests/lint.scm    |    5 ++++-
 tests/publish.scm |    4 ++++
 2 files changed, 8 insertions(+), 1 deletions(-)

diff --git a/tests/lint.scm b/tests/lint.scm
index df82593..b8dad13 100644
--- a/tests/lint.scm
+++ b/tests/lint.scm
@@ -1,7 +1,7 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2012, 2013 Cyril Roelandt <address@hidden>
 ;;; Copyright © 2014, 2015 Eric Bavier <address@hidden>
-;;; Copyright © 2014, 2015 Ludovic Courtès <address@hidden>
+;;; Copyright © 2014, 2015, 2016 Ludovic Courtès <address@hidden>
 ;;; Copyright © 2015 Mathieu Lirzin <address@hidden>
 ;;;
 ;;; This file is part of GNU Guix.
@@ -19,6 +19,9 @@
 ;;; You should have received a copy of the GNU General Public License
 ;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
 
+;; Avoid interference.
+(unsetenv "http_proxy")
+
 (define-module (test-lint)
   #:use-module (guix tests)
   #:use-module (guix download)
diff --git a/tests/publish.scm b/tests/publish.scm
index 4d72fdc..0b92390 100644
--- a/tests/publish.scm
+++ b/tests/publish.scm
@@ -16,6 +16,9 @@
 ;;; You should have received a copy of the GNU General Public License
 ;;; along with GNU Guix.  If not, see <http://www.gnu.org/licenses/>.
 
+;; Avoid interference.
+(unsetenv "http_proxy")
+
 (define-module (test-publish)
   #:use-module (guix scripts publish)
   #:use-module (guix tests)
@@ -62,6 +65,7 @@
              (connect conn AF_INET (inet-pton AF_INET "127.0.0.1") 6789))
       (loop))))
 
+
 (test-begin "publish")
 
 (test-equal "/nix-cache-info"