~ruther/guix-local

c74f0cb2b871f59466e6fbfbc954d8fc1cbc3c9c — Ludovic Courtès 10 years ago c4847f4
tests: Prevent 'http_proxy' from breaking Web server tests.

* tests/lint.scm: Add call to 'unsetenv' to remove 'http_proxy'.
* tests/publish.scm: Likewise.
2 files changed, 8 insertions(+), 1 deletions(-)

M tests/lint.scm
M tests/publish.scm
M tests/lint.scm => tests/lint.scm +4 -1
@@ 1,7 1,7 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2012, 2013 Cyril Roelandt <tipecaml@gmail.com>
;;; Copyright © 2014, 2015 Eric Bavier <bavier@member.fsf.org>
;;; Copyright © 2014, 2015 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2014, 2015, 2016 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2015 Mathieu Lirzin <mthl@openmailbox.org>
;;;
;;; 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)

M tests/publish.scm => tests/publish.scm +4 -0
@@ 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"