diff options
author | Marius Bakke <mbakke@fastmail.com> | 2017-04-18 18:30:13 +0200 |
---|---|---|
committer | Marius Bakke <mbakke@fastmail.com> | 2017-04-18 18:30:13 +0200 |
commit | 8c4b4b65624198261d6e583214da9aa7c5524290 (patch) | |
tree | 5950b2d9e7608d154109b69dc349d1ab2b3ab371 /gnu/build/vm.scm | |
parent | 40522a7e89bc169233ec724592c9439e8004f4ad (diff) | |
parent | f8818360d5c185543b4bd1ad1c3c3ad7191af0c4 (diff) | |
download | guix-8c4b4b65624198261d6e583214da9aa7c5524290.tar guix-8c4b4b65624198261d6e583214da9aa7c5524290.tar.gz |
Merge branch 'master' into staging
Diffstat (limited to 'gnu/build/vm.scm')
-rw-r--r-- | gnu/build/vm.scm | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/gnu/build/vm.scm b/gnu/build/vm.scm index 44a3000eb1..1eb9a4c45e 100644 --- a/gnu/build/vm.scm +++ b/gnu/build/vm.scm @@ -2,6 +2,7 @@ ;;; Copyright © 2013, 2014, 2015, 2016 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2016 Christopher Allan Webber <cwebber@dustycloud.org> ;;; Copyright © 2016 Leo Famulari <leo@famulari.name> +;;; Copyright © 2017 Mathieu Othacehe <m.othacehe@gmail.com> ;;; ;;; This file is part of GNU Guix. ;;; @@ -284,18 +285,18 @@ SYSTEM-DIRECTORY is the name of the directory of the 'system' derivation." (unless register-closures? (reset-timestamps target)))) -(define (register-grub.cfg-root target grub.cfg) - "On file system TARGET, register GRUB.CFG as a GC root." +(define (register-grub.cfg-root target bootcfg) + "On file system TARGET, register BOOTCFG as a GC root." (let ((directory (string-append target "/var/guix/gcroots"))) (mkdir-p directory) - (symlink grub.cfg (string-append directory "/grub.cfg")))) + (symlink bootcfg (string-append directory "/grub.cfg")))) (define* (initialize-hard-disk device #:key grub.cfg (partitions '())) "Initialize DEVICE as a disk containing all the <partition> objects listed -in PARTITIONS, and using GRUB.CFG as its bootloader configuration file. +in PARTITIONS, and using BOOTCFG as its bootloader configuration file. Each partition is initialized by calling its 'initializer' procedure, passing it a directory name where it is mounted." |