[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
08/08: installer: Use 'append' and 'list' instead of 'cons*'.
From: |
guix-commits |
Subject: |
08/08: installer: Use 'append' and 'list' instead of 'cons*'. |
Date: |
Mon, 8 Apr 2019 04:42:59 -0400 (EDT) |
civodul pushed a commit to branch master
in repository guix.
commit 8d75e20e4b62470e0f0e63556794ea5a02c34359
Author: Ludovic Courtès <address@hidden>
Date: Mon Apr 8 10:42:10 2019 +0200
installer: Use 'append' and 'list' instead of 'cons*'.
* gnu/installer/services.scm (system-services->configuration): Use
'append' and 'list' instead of 'cons*'.
---
gnu/installer/services.scm | 16 ++++++++--------
1 file changed, 8 insertions(+), 8 deletions(-)
diff --git a/gnu/installer/services.scm b/gnu/installer/services.scm
index 1036b21..0e98392 100644
--- a/gnu/installer/services.scm
+++ b/gnu/installer/services.scm
@@ -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))))))
- branch master updated (bf71ac0 -> 8d75e20), guix-commits, 2019/04/08
- 01/08: gnu: guix: Update to d78bfd2., guix-commits, 2019/04/08
- 02/08: gnu: sbcl-trivial-backtrace: Fix 'license' field., guix-commits, 2019/04/08
- 03/08: gnu: scalapack: Use 'non-copyleft' as the license., guix-commits, 2019/04/08
- 06/08: installer: Xfce service uses the 'service' form., guix-commits, 2019/04/08
- 05/08: gnu: mpv: Set absolute path to 'youtube-dl'., guix-commits, 2019/04/08
- 04/08: licenses: Remove 'bsd-style'., guix-commits, 2019/04/08
- 07/08: installer: Generate 'set-xorg-configuration' snippet., guix-commits, 2019/04/08
- 08/08: installer: Use 'append' and 'list' instead of 'cons*'.,
guix-commits <=