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

[guix-commits]

ambrevar pushed a commit to branch install-doc-overhaul
in repository guix.

commit 6a7d7ca78442a2132d4a44220ddbb38519bc1074
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 e73302d..861c4d3 100644
--- a/doc/guix.texi
+++ b/doc/guix.texi
@@ -10857,9 +10857,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
 
@@ -11489,11 +11489,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