diff options
author | Pierre Neidhardt <mail@ambrevar.xyz> | 2019-01-21 19:37:59 +0100 |
---|---|---|
committer | Pierre Neidhardt <mail@ambrevar.xyz> | 2019-01-23 18:01:16 +0100 |
commit | 907dd32720cf7ae94876c1da2df775f524f5f795 (patch) | |
tree | 41d57085a2543741823ba9fd4533195634bbe41d /gnu/system/examples/beaglebone-black.tmpl | |
parent | ece2fd121866e4f46c5a4be92c6f09b6c1042ea1 (diff) | |
download | patches-907dd32720cf7ae94876c1da2df775f524f5f795.tar patches-907dd32720cf7ae94876c1da2df775f524f5f795.tar.gz |
gnu: Replace all cons* with beginner-friendly (append (list ...)).
* gnu/system/examples/bare-bones.tmpl (services): Do it.
* gnu/system/examples/beaglebone.tmpl (packages): Do it.
(services): Do it.
* gnu/system/examples/desktop.tmpl (packages): Do it.
(services): Do it.
* gnu/system/examples/lightweight-desktop.tmpl (file-systems): Do it.
(packages): Do it.
* gnu/system/examples/vm-image.tmpl (packages): Do it.
Diffstat (limited to 'gnu/system/examples/beaglebone-black.tmpl')
-rw-r--r-- | gnu/system/examples/beaglebone-black.tmpl | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/gnu/system/examples/beaglebone-black.tmpl b/gnu/system/examples/beaglebone-black.tmpl index efef682e3a..11678063b2 100644 --- a/gnu/system/examples/beaglebone-black.tmpl +++ b/gnu/system/examples/beaglebone-black.tmpl @@ -43,15 +43,15 @@ %base-user-accounts)) ;; Globally-installed packages. - (packages (cons* screen openssh %base-packages)) - - (services (cons* (service dhcp-client-service-type) - ;; mingetty does not work on serial lines. - ;; Use agetty with board-specific serial parameters. - (agetty-service - (agetty-configuration - (extra-options '("-L")) - (baud-rate "115200") - (term "vt100") - (tty "ttyO0"))) - %base-services))) + (packages (append (list screen openssh) %base-packages)) + + (services (append (list (service dhcp-client-service-type) + ;; mingetty does not work on serial lines. + ;; Use agetty with board-specific serial parameters. + (agetty-service + (agetty-configuration + (extra-options '("-L")) + (baud-rate "115200") + (term "vt100") + (tty "ttyO0")))) + %base-services))) |