diff options
| author | Mathieu Lirzin <mthl@gnu.org> | 2016-03-23 22:37:06 +0100 |
|---|---|---|
| committer | Mathieu Lirzin <mthl@gnu.org> | 2016-03-28 15:31:41 +0200 |
| commit | b65703c03e43e35d9f2bfd1ae2b0a858b47177f7 (patch) | |
| tree | 1007d6ef76a5da8c92c54babd982d18b9af1bf87 | |
| parent | ce0c9e264008173a9707c8e8e199f8623099fa3c (diff) | |
tests: Silence %have-nix-hash?.
* tests/base32.scm (%have-nix-hash?): Use 'which' instead of 'system' to
avoid polluting standard output.
| -rw-r--r-- | tests/base32.scm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tests/base32.scm b/tests/base32.scm index 194f8da96b..7f59e76456 100644 --- a/tests/base32.scm +++ b/tests/base32.scm @@ -1,5 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2012, 2013, 2015 Ludovic Courtès <ludo@gnu.org> +;;; Copyright © 2016 Mathieu Lirzin <mthl@gnu.org> ;;; ;;; This file is part of GNU Guix. ;;; @@ -19,6 +20,7 @@ (define-module (test-base32) #:use-module (guix hash) #:use-module (guix base32) + #:use-module (guix build utils) #:use-module (guix utils) #:use-module (srfi srfi-1) #:use-module (srfi srfi-34) @@ -39,9 +41,7 @@ "nix-hash")) (define %have-nix-hash? - ;; Note: Use `system', not `system*', because of <http://bugs.gnu.org/13166>. - (false-if-exception - (zero? (system (string-append %nix-hash " --version"))))) + (which %nix-hash)) (test-begin "base32") |