summaryrefslogtreecommitdiff
path: root/guix
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2020-03-27 18:36:20 +0100
committerLudovic Courtès <ludo@gnu.org>2020-03-27 19:09:30 +0100
commit2b6fe60599d52b449bbf531cfdc4dbf18a14eb2c (patch)
tree1edc59b923b16a793ed29557451e32d2628d8f9e /guix
parent313973980215a50ac0b40b44ab995254eff1dae5 (diff)
packages: Use Guile 3.0 for grafts.
* guix/packages.scm (guile-2.0): Rename to... (guile-for-grafts): ... this, and adjust callers. Refer to 'guile-3.0' instead of 'guile-2.0'.
Diffstat (limited to 'guix')
-rw-r--r--guix/packages.scm12
1 files changed, 6 insertions, 6 deletions
diff --git a/guix/packages.scm b/guix/packages.scm
index 70b1478c91..2552f8bf7c 100644
--- a/guix/packages.scm
+++ b/guix/packages.scm
@@ -444,12 +444,12 @@ derivations."
(let ((distro (resolve-interface '(gnu packages commencement))))
(module-ref distro 'guile-final)))
-(define (guile-2.0)
- "Return Guile 2.0."
- ;; FIXME: This is used as a workaround for <https://bugs.gnu.org/28211> when
+(define (guile-for-grafts)
+ "Return the Guile package used to build grafting derivations."
+ ;; Guile 2.2 would not work due to <https://bugs.gnu.org/28211> when
;; grafting packages.
(let ((distro (resolve-interface '(gnu packages guile))))
- (module-ref distro 'guile-2.0)))
+ (module-ref distro 'guile-3.0)))
(define* (default-guile-derivation #:optional (system (%current-system)))
"Return the derivation for SYSTEM of the default Guile package used to run
@@ -1269,7 +1269,7 @@ This is an internal procedure."
(()
drv)
(grafts
- (let ((guile (package-derivation store (guile-2.0)
+ (let ((guile (package-derivation store (guile-for-grafts)
system #:graft? #f)))
;; TODO: As an optimization, we can simply graft the tip
;; of the derivation graph since 'graft-derivation'
@@ -1295,7 +1295,7 @@ system identifying string)."
(graft-derivation store drv grafts
#:system system
#:guile
- (package-derivation store (guile-2.0)
+ (package-derivation store (guile-for-grafts)
system #:graft? #f))))
drv))))