From ef8de9852eeb9f9ce8e01a2a4f60a057b890b94a Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Sun, 6 Mar 2016 21:53:28 +0100 Subject: tests: Disable grafting by default for most tests. This allows tests to run as expected even in the presence of replacements among the bootstrap packages, such as Perl (commit d8173f21f7b4e3cb83541b8fa70621d2b6d4ce1c). * tests/cpan.scm: Add (%graft? #f). * tests/derivations.scm: Likewise. * tests/graph.scm: Likewise. * tests/monads.scm: Likewise. * tests/profiles.scm: Likewise. * tests/gexp.scm: Likewise. ("gexp->derivation vs. grafts"): Explicitly reenable grafting before, and disable it after, using 'set-grafting'. --- tests/graph.scm | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'tests/graph.scm') diff --git a/tests/graph.scm b/tests/graph.scm index 43f7b733f9..4205b9b8c7 100644 --- a/tests/graph.scm +++ b/tests/graph.scm @@ -24,6 +24,7 @@ #:use-module (guix derivations) #:use-module (guix store) #:use-module (guix monads) + #:use-module (guix grafts) #:use-module (guix build-system gnu) #:use-module (guix build-system trivial) #:use-module (guix gexp) @@ -41,6 +42,9 @@ (define %store (open-connection-for-tests)) +;; Globally disable grafts because they can trigger early builds. +(%graft? #f) + (define (make-recording-backend) "Return a and a thunk that returns the recorded nodes and edges." -- cgit v1.2.3