03/04: system: beaglebone-black: Use 'initrd-modules'.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guix.

commit f850e0da8e56b8e38b0a6c49f4c0618f16c8c572
Author: Ludovic Courtès <address@hidden>
Date:   Sat Mar 3 01:29:18 2018 +0100

    system: beaglebone-black: Use 'initrd-modules'.
    
    * gnu/system/examples/beaglebone-black.tmpl: Use 'initrd-modules'
    instead of 'initrd'.
---
 gnu/system/examples/beaglebone-black.tmpl | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/gnu/system/examples/beaglebone-black.tmpl 
b/gnu/system/examples/beaglebone-black.tmpl
index 4b090e0..9720133 100644
--- a/gnu/system/examples/beaglebone-black.tmpl
+++ b/gnu/system/examples/beaglebone-black.tmpl
@@ -15,11 +15,10 @@
   (bootloader (bootloader-configuration
                (bootloader u-boot-beaglebone-black-bootloader)
                (target "/dev/mmcblk1")))
-  (initrd (lambda (fs . rest)
-            (apply base-initrd fs
-                   ;; This module is required to mount the sd card.
-                   #:extra-modules (list "omap_hsmmc")
-                   rest)))
+
+  ;; This module is required to mount the SD card.
+  (initrd-modules (cons "omap_hsmmc" %base-initrd-modules))
+
   (file-systems (cons (file-system
                         (device "my-root")
                         (title 'label)