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

gnu: Refactor boot-service-type and activation-service-type. 

* gnu/services.scm (boot-service-type) <compose>: Use the "identity"
  procedure instead of the "append" procedure because it more accurately
  reflects the intent, which is to simply return the single list of
  extensions to which fold-services applies the "compose" procedure.
  (activation-service-type) <compose>: Likewise.
This commit is contained in:
Chris Marusich 2018-03-29 08:33:13 +02:00
parent 881c61d062
commit 7874e9e047
No known key found for this signature in database
GPG Key ID: DD409A15D822469D
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
gnu/services.scm
View File

@ -352,7 +352,7 @@ directory."
(extensions (extensions
(list (service-extension system-service-type (list (service-extension system-service-type
boot-script-entry))) boot-script-entry)))
(compose append) (compose identity)
(extend compute-boot-script))) (extend compute-boot-script)))
(define %boot-service (define %boot-service
@ -457,7 +457,7 @@ ACTIVATION-SCRIPT-TYPE."
(extensions (extensions
(list (service-extension boot-service-type (list (service-extension boot-service-type
gexps->activation-gexp))) gexps->activation-gexp)))
(compose append) (compose identity)
(extend second-argument))) (extend second-argument)))
(define %activation-service (define %activation-service