guix-devel
[Top][All Lists]
Advanced

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

[PATCH 3/6] services: 'fold-service-types' honors its seed.


From: Ludovic Courtès
Subject: [PATCH 3/6] services: 'fold-service-types' honors its seed.
Date: Wed, 8 Nov 2017 14:09:18 +0100

* gnu/services.scm (fold-service-types): Use SEED instead of '().
---
 gnu/services.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gnu/services.scm b/gnu/services.scm
index 50be28a38..89c5d52c8 100644
--- a/gnu/services.scm
+++ b/gnu/services.scm
@@ -184,7 +184,7 @@ is used as the initial value of RESULT."
                                   (if (service-type? object)
                                       (proc object result)
                                       result))
-                                '()
+                                seed
                                 modules))
 
 ;; Services of a given type.
-- 
2.15.0




reply via email to

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