summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2026-02-14 23:13:13 +0100
committerLudovic Courtès <ludo@gnu.org>2026-03-08 14:13:48 +0100
commitf650dc0d80aa14b0afa956a5f4fc2a4150b4dc51 (patch)
treec89947e54fec109e4572709a1ed590e3219f09c3
parentf6c4dbdf5d151abf001e05d56081c8b65776edc2 (diff)
gexp: Catch more cases of modules imported from the host Guile.
* guix/gexp.scm (gexp-modules)[validate-modules]: Recognize more Guile module namespaces. Change-Id: I02eab269760cc3ccc882359dd7870363831aaeda
-rw-r--r--guix/gexp.scm6
1 files changed, 4 insertions, 2 deletions
diff --git a/guix/gexp.scm b/guix/gexp.scm
index 5305678b342..c798650ff69 100644
--- a/guix/gexp.scm
+++ b/guix/gexp.scm
@@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2014-2025 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2014-2026 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2018 Clément Lassieur <clement@lassieur.org>
;;; Copyright © 2018 Jan Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2019, 2020 Mathieu Othacehe <m.othacehe@gmail.com>
@@ -918,7 +918,9 @@ false, meaning that GEXP is a plain Scheme object, return the empty list."
;; user and may thus be a source of non-reproducibility. This includes
;; (guix config) as well as modules that come with Guile.
(match (filter (match-lambda
- ((or ('guix 'config) ('ice-9 . _)) #t)
+ ((or ('guix 'config) ('ice-9 . _)
+ ('srfi . _) ('rnrs . _) ('scheme . _))
+ #t)
(_ #f))
modules)
(() #t)