From eafee15b3ce3638058c43974244964dbd48ec15d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= <ludo@gnu.org>
Date: Tue, 25 Mar 2014 20:45:13 +0100
Subject: [PATCH] check-available-binaries: Make sure substitutes are enabled.

* build-aux/check-available-binaries.scm: Add call to
  'set-build-options'.
---
 build-aux/check-available-binaries.scm | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/build-aux/check-available-binaries.scm b/build-aux/check-available-binaries.scm
index 92810795e1..d5163a9503 100644
--- a/build-aux/check-available-binaries.scm
+++ b/build-aux/check-available-binaries.scm
@@ -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 @@
                     drv)
             #f))))
 
+  (set-build-options store #:use-substitutes? #t)
   (let ((result (every (compose (warn (cut has-substitutes? store <>))
                                 derivation->output-path)
                        total)))