M tests/builders.scm => tests/builders.scm +4 -0
@@ 34,6 34,10 @@
(define %store
(false-if-exception (open-connection)))
+(when %store
+ ;; Make sure we build everything by ourselves.
+ (set-build-options %store #:use-substitutes? #f))
+
(define %bootstrap-inputs
;; Use the bootstrap inputs so it doesn't take ages to run these tests.
;; This still involves building Make, Diffutils, and Findutils.
M tests/derivations.scm => tests/derivations.scm +3 -0
@@ 39,6 39,9 @@
(false-if-exception (open-connection)))
(when %store
+ ;; Make sure we build everything by ourselves.
+ (set-build-options %store #:use-substitutes? #f)
+
;; By default, use %BOOTSTRAP-GUILE for the current system.
(let ((drv (package-derivation %store %bootstrap-guile)))
(%guile-for-build drv)))
M tests/packages.scm => tests/packages.scm +4 -0
@@ 35,6 35,10 @@
(define %store
(false-if-exception (open-connection)))
+(when %store
+ ;; Make sure we build everything by ourselves.
+ (set-build-options %store #:use-substitutes? #f))
+
(define %bootstrap-inputs
;; Use the bootstrap inputs so it doesn't take ages to run these tests.
;; This still involves building GNU Make and GNU Diffutils.