06/08: linux-initrd: Add a hint for the missing module error.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guix.

commit abfbdafd0ee331770f783a75cff29aada9fbf4ae
Author: Ludovic Courtès <address@hidden>
Date:   Wed Mar 7 11:00:44 2018 +0100

    linux-initrd: Add a hint for the missing module error.
    
    * gnu/system/linux-initrd.scm (check-device-initrd-modules): Add a
    '&fix-hint'.
---
 gnu/system/linux-initrd.scm | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/gnu/system/linux-initrd.scm b/gnu/system/linux-initrd.scm
index d75caed..1eb5f51 100644
--- a/gnu/system/linux-initrd.scm
+++ b/gnu/system/linux-initrd.scm
@@ -362,6 +362,18 @@ DEVICE must be a \"/dev\" file name."
                (message (format #f (G_ "you may need these modules \
 in the initrd for ~a:~{ ~a~}")
                                 device modules)))
+              (&fix-hint
+               (hint (format #f (G_ "Try adding them to the
address@hidden field of your @code{operating-system} declaration, along
+these lines:
+
address@hidden
+ (operating-system
+   ;; @dots{}
+   (initrd-modules (append (list~{ ~s~})
+                           %base-initrd-modules)))
address@hidden example\n")
+                             modules)))
               (&error-location
                (location (source-properties->location location))))))))