me
/
guix
Archived
1
0
Fork 0
Code

system: vm: Use Guile 3.0 in Docker images. 

* gnu/system/vm.scm (system-docker-image): Use GUILE-3.0.
master
Ludovic Courtès 2021-02-25 11:25:57 +01:00
parent 412e4f081e
commit 60fd4118f7
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gnu/system/vm.scm
View File

@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU ;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013, 2014, 2015, 2016, 2017, 2018, 2019, 2020 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2013, 2014, 2015, 2016, 2017, 2018, 2019, 2020, 2021 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2016 Christopher Allan Webber <cwebber@dustycloud.org> ;;; Copyright © 2016 Christopher Allan Webber <cwebber@dustycloud.org>
;;; Copyright © 2016, 2017 Leo Famulari <leo@famulari.name> ;;; Copyright © 2016, 2017 Leo Famulari <leo@famulari.name>
;;; Copyright © 2017 Mathieu Othacehe <m.othacehe@gmail.com> ;;; Copyright © 2017 Mathieu Othacehe <m.othacehe@gmail.com>
@ -480,7 +480,7 @@ the operating system."
(program-file "boot-program" (program-file "boot-program"
#~(let ((system (cadr (command-line)))) #~(let ((system (cadr (command-line))))
(setenv "GUIX_NEW_SYSTEM" system) (setenv "GUIX_NEW_SYSTEM" system)
(execl #$(file-append guile-2.2 "/bin/guile") (execl #$(file-append guile-3.0 "/bin/guile")
"guile" "--no-auto-compile" "guile" "--no-auto-compile"
(string-append system "/boot"))))) (string-append system "/boot")))))