mirror/guix
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2025-02-07 11:29:59 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

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

Browse source 
* doc/guix.texi (Base Services): Do it.
This commit is contained in:
Pierre Neidhardt 2019-01-21 20:24:44 +01:00
parent 1d76baa3cf
commit 6a7d7ca784
No known key found for this signature in database
GPG key ID: 9BDCF497A4BBCC7F
1 changed files with 9 additions and 8 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

17
doc/guix.texi
View file

@ -10857,9 +10857,9 @@ system, you will want to append services to @var{%base-services}, like
this: this:
@example @example
(cons* (service avahi-service-type) (append (list (service avahi-service-type)
(service openssh-service-type) (service openssh-service-type))
%base-services) %base-services)
@end example @end example
@end defvr @end defvr
@ -11489,11 +11489,12 @@ well as in the @var{groups} field of the @var{operating-system} record.
;; @dots{} ;; @dots{}
(services (services
(modify-services %desktop-services (modify-services %desktop-services
(udev-service-type config => (udev-service-type
(udev-configuration (inherit config) config =>
(rules (cons* android-udev-rules (udev-configuration (inherit config)
(udev-configuration-rules config)))))))) (rules (cons android-udev-rules
(udev-configuration-rules config))))))))
@end example @end example
@defvr {Scheme Variable} urandom-seed-service-type @defvr {Scheme Variable} urandom-seed-service-type