From 88fbb69264a412ca2c7e6c4de024414444bd2df8 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Wed, 10 Feb 2021 08:21:14 +0000 Subject: Tweak trying to safely load the (guix narinfo) module I think the eval-when thing might help given narinfo-references is a syntax thing, rather than a normal procedure. --- guix-build-coordinator/utils.scm | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) (limited to 'guix-build-coordinator/utils.scm') diff --git a/guix-build-coordinator/utils.scm b/guix-build-coordinator/utils.scm index 67c83e8..20cf007 100644 --- a/guix-build-coordinator/utils.scm +++ b/guix-build-coordinator/utils.scm @@ -56,9 +56,11 @@ get-load-average)) -(when (defined? 'narinfo-references (resolve-module '(guix narinfo))) - ;; This module contains narinfo-references in newer version of Guix - (use-modules (guix narinfo))) +(eval-when (eval load compile) + (begin + (when (defined? 'narinfo-references (resolve-module '(guix narinfo))) + ;; This module contains narinfo-references in newer version of Guix + (use-modules (guix narinfo))))) (define (random-v4-uuid) ;; https://tools.ietf.org/html/rfc4122#page-14 -- cgit v1.2.3