guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

04/04: doc: Replace some cons* with beginner-friendly (append (list ...)


From: guix-commits
Subject: 04/04: doc: Replace some cons* with beginner-friendly (append (list ...)).
Date: Wed, 23 Jan 2019 12:01:45 -0500 (EST)

ambrevar pushed a commit to branch master
in repository guix.

commit b1c4dafbf1428b5e004c2c1c173eaa8b7a73ed39
Author: Pierre Neidhardt <address@hidden>
Date:   Mon Jan 21 20:24:44 2019 +0100

    doc: Replace some cons* with beginner-friendly (append (list ...)).
    
    * doc/guix.texi (Base Services): Do it.
---
 doc/guix.texi | 17 +++++++++--------
 1 file changed, 9 insertions(+), 8 deletions(-)

diff --git a/doc/guix.texi b/doc/guix.texi
index b8071d1..afc0ef8 100644
--- a/doc/guix.texi
+++ b/doc/guix.texi
@@ -10888,9 +10888,9 @@ system, you will want to append services to 
@var{%base-services}, like
 this:
 
 @example
-(cons* (service avahi-service-type)
-       (service openssh-service-type)
-       %base-services)
+(append (list (service avahi-service-type)
+              (service openssh-service-type))
+        %base-services)
 @end example
 @end defvr
 
@@ -11520,11 +11520,12 @@ well as in the @var{groups} field of the 
@var{operating-system} record.
   ;; @dots{}
 
   (services
-    (modify-services %desktop-services
-      (udev-service-type config =>
-       (udev-configuration (inherit config)
-       (rules (cons* android-udev-rules
-              (udev-configuration-rules config))))))))
+   (modify-services %desktop-services
+     (udev-service-type
+      config =>
+      (udev-configuration (inherit config)
+                          (rules (cons android-udev-rules
+                                       (udev-configuration-rules config))))))))
 @end example
 
 @defvr {Scheme Variable} urandom-seed-service-type



reply via email to

[Prev in Thread] Current Thread [Next in Thread]