05/48: vm: Make the device node procedure a parameter.

[guix-commits]

janneke pushed a commit to branch wip-hurd-vm
in repository guix.

commit c927ae8d8b7c8cddf093d98f1d9e30a5233677b1
Author: Ludovic Courtès <address@hidden>
AuthorDate: Tue Apr 7 10:21:48 2020 +0200

    vm: Make the device node procedure a parameter.
    
    * gnu/build/vm.scm (root-partition-initializer): Add #:make-device-nodes
    parameter and use it.
    * gnu/system/vm.scm (qemu-image): Add #:device-node parameter.  Pass
     #:make-device-nodes to 'root-partition-initializer'.
    * gnu/system/hurd.scm (cross-hurd-image): Pass #:device-nodes 'hurd to
    'qemu-image'.
---
 gnu/system/hurd.scm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/gnu/system/hurd.scm b/gnu/system/hurd.scm
index 2583ff0..059bfaf 100644
--- a/gnu/system/hurd.scm
+++ b/gnu/system/hurd.scm
@@ -209,6 +209,7 @@ fi\n"))
               #:bootcfg-drv grub.cfg
               #:bootloader grub-bootloader
               #:register-closures? #f
+              #:device-nodes 'hurd
               #:extra-directives hurd-directives))
 
 ;; Return this thunk so one can type "guix build -f gnu/system/hurd.scm".