check-available-binaries: Make sure substitutes are enabled.

* build-aux/check-available-binaries.scm: Add call to
  'set-build-options'.
This commit is contained in:
Ludovic Courtès 2014-03-25 20:45:13 +01:00
parent 1971737f2b
commit eafee15b3c

View file

@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2013, 2014 Ludovic Courtès <ludo@gnu.org>
;;;
;;; This file is part of GNU Guix.
;;;
@ -48,6 +48,7 @@ (define (warn proc)
drv)
#f))))
(set-build-options store #:use-substitutes? #t)
(let ((result (every (compose (warn (cut has-substitutes? store <>))
derivation->output-path)
total)))