nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

installer: Use 'append' and 'list' instead of 'cons*'. 

* gnu/installer/services.scm (system-services->configuration): Use
'append' and 'list' instead of 'cons*'.
This commit is contained in:
Ludovic Courtès 2019-04-08 10:42:10 +02:00
parent 469e56b4af
commit 8d75e20e4b
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
gnu/installer/services.scm
View File

@ -102,13 +102,13 @@
'%base-services)))
(if (null? snippets)
`((services ,base))
`((services (cons* ,@snippets
,@(if desktop?
;; XXX: Assume 'keyboard-layout' is in scope.
'((set-xorg-configuration
(xorg-configuration
(keyboard-layout keyboard-layout))))
'())
`((services (append (list ,@snippets
,@(if desktop?
;; XXX: Assume 'keyboard-layout' is in
;; scope.
'((set-xorg-configuration
(xorg-configuration
(keyboard-layout keyboard-layout))))
'()))
,base))))))