* guix/scripts/system.scm (display-system-generation): Display
multiboot-modules commands if set.
(uuid->string root)
root))
(kernel (boot-parameters-kernel params))
+ (multiboot-modules (boot-parameters-multiboot-modules params))
(provenance (catch 'system-error
(lambda ()
(call-with-input-file
(format #t (G_ " kernel: ~a~%") kernel)
+ (match multiboot-modules
+ (() #f)
+ (((modules . _) ...)
+ (format #t (G_ " multiboot: ~a~%")
+ (string-join modules "\n "))))
+
(match provenance
(#f #t)
(('provenance ('version 0)