From 548e6283984225c0a8dbe26f237751cb3df25ec9 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Fri, 21 Jun 2019 15:45:50 +0200 Subject: [PATCH] Set #:fallback? to #t If a substitute fails, just build it anyway. --- guix-data-service/jobs/load-new-guix-revision.scm | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/guix-data-service/jobs/load-new-guix-revision.scm b/guix-data-service/jobs/load-new-guix-revision.scm index 479de33..d5c2da4 100644 --- a/guix-data-service/jobs/load-new-guix-revision.scm +++ b/guix-data-service/jobs/load-new-guix-revision.scm @@ -388,6 +388,8 @@ (simple-format #t "debug: extract-information-from: ~A\n" store-path) (with-store store + (set-build-options store + #:fallback? #t) (let ((inf (if (defined? 'open-inferior/container) (open-inferior/container store store-path #:extra-shared-directories @@ -426,6 +428,8 @@ (define (store-item-for-git-repository-id-and-commit conn git-repository-id commit) (with-store store + (set-build-options store + #:fallback? #t) (channel->guix-store-item store (channel (name 'guix)