mirror of
https://codeberg.org/guix/guix.git
synced 2025-10-02 02:15:12 +00:00
tests: Silence %have-nix-hash?.
* tests/base32.scm (%have-nix-hash?): Use 'which' instead of 'system' to avoid polluting standard output.
This commit is contained in:
parent
ce0c9e2640
commit
b65703c03e
1 changed files with 3 additions and 3 deletions
|
@ -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")
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue