Archived
1
0
Fork 0

bootloader: Wrap lines.

* gnu/bootloader (<bootloader-configuration>): Wrap lines, no functional
change.
This commit is contained in:
Mathieu Othacehe 2022-08-29 22:24:24 +02:00
parent f126f23b13
commit 93ed34977e
No known key found for this signature in database
GPG key ID: 8354763531769CA6

View file

@ -1,6 +1,6 @@
;;; GNU Guix --- Functional package management for GNU ;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2017 David Craven <david@craven.ch> ;;; Copyright © 2017 David Craven <david@craven.ch>
;;; Copyright © 2017, 2020 Mathieu Othacehe <m.othacehe@gmail.com> ;;; Copyright © 2017, 2020, 2022 Mathieu Othacehe <othacehe@gnu.org>
;;; Copyright © 2017 Leo Famulari <leo@famulari.name> ;;; Copyright © 2017 Leo Famulari <leo@famulari.name>
;;; Copyright © 2019, 2021 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2019, 2021 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org> ;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
@ -212,31 +212,33 @@ instead~%")))
(define-record-type* <bootloader-configuration> (define-record-type* <bootloader-configuration>
bootloader-configuration make-bootloader-configuration bootloader-configuration make-bootloader-configuration
bootloader-configuration? bootloader-configuration?
(bootloader bootloader-configuration-bootloader) ;<bootloader> (bootloader
(targets %bootloader-configuration-targets ;list of strings bootloader-configuration-bootloader) ;<bootloader>
(default #f)) (targets %bootloader-configuration-targets
(target %bootloader-configuration-target ;deprecated (default #f)) ;list of strings
(default #f) (sanitize warn-target-field-deprecation)) (target %bootloader-configuration-target ;deprecated
(menu-entries bootloader-configuration-menu-entries ;list of <menu-entry> (default #f)
(default '())) (sanitize warn-target-field-deprecation))
(default-entry bootloader-configuration-default-entry ;integer (menu-entries bootloader-configuration-menu-entries
(default 0)) (default '())) ;list of <menu-entry>
(timeout bootloader-configuration-timeout ;seconds as integer (default-entry bootloader-configuration-default-entry
(default 5)) (default 0)) ;integer
(keyboard-layout bootloader-configuration-keyboard-layout ;<keyboard-layout> | #f (timeout bootloader-configuration-timeout
(default #f)) (default 5)) ;seconds as integer
(theme bootloader-configuration-theme ;bootloader-specific theme (keyboard-layout bootloader-configuration-keyboard-layout
(default #f)) (default #f)) ;<keyboard-layout> | #f
(terminal-outputs bootloader-configuration-terminal-outputs ;list of symbols (theme bootloader-configuration-theme
(default '(gfxterm))) (default #f)) ;bootloader-specific theme
(terminal-inputs bootloader-configuration-terminal-inputs ;list of symbols (terminal-outputs bootloader-configuration-terminal-outputs
(default '())) (default '(gfxterm))) ;list of symbols
(serial-unit bootloader-configuration-serial-unit ;integer | #f (terminal-inputs bootloader-configuration-terminal-inputs
(default #f)) (default '())) ;list of symbols
(serial-speed bootloader-configuration-serial-speed ;integer | #f (serial-unit bootloader-configuration-serial-unit
(default #f)) (default #f)) ;integer | #f
(device-tree-support? bootloader-configuration-device-tree-support? (serial-speed bootloader-configuration-serial-speed
(default #t))) ;boolean (default #f)) ;integer | #f
(device-tree-support? bootloader-configuration-device-tree-support?
(default #t))) ;boolean
(define-deprecated (bootloader-configuration-target config) (define-deprecated (bootloader-configuration-target config)
bootloader-configuration-targets bootloader-configuration-targets