01/01: system: examples: Add missing initrd to beaglebone-black.tmpl.

[Mathieu Othacehe]

mothacehe pushed a commit to branch master
in repository guix.

commit a468f897437acfc1c70987a6df252c4735e3bf2d
Author: Mathieu Othacehe <address@hidden>
Date:   Fri Dec 22 08:46:56 2017 +0100

    system: examples: Add missing initrd to beaglebone-black.tmpl.
    
    * gnu/system/examples/beaglebone-black.tmpl (operating-system): Add the
      initrd with "omap_hsmmc" as an extra-module.
---
 gnu/system/examples/beaglebone-black.tmpl | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/gnu/system/examples/beaglebone-black.tmpl 
b/gnu/system/examples/beaglebone-black.tmpl
index 609b801..4b090e0 100644
--- a/gnu/system/examples/beaglebone-black.tmpl
+++ b/gnu/system/examples/beaglebone-black.tmpl
@@ -15,6 +15,11 @@
   (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)))
   (file-systems (cons (file-system
                         (device "my-root")
                         (title 'label)