[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
01/02: services: configuration: Fix typo.
From: |
guix-commits |
Subject: |
01/02: services: configuration: Fix typo. |
Date: |
Fri, 23 Sep 2022 00:51:57 -0400 (EDT) |
apteryx pushed a commit to branch master
in repository guix.
commit 46fee48d5c89bcffdf759645484e063ada2d97c0
Author: Maxim Cournoyer <maxim.cournoyer@gmail.com>
AuthorDate: Wed Sep 21 16:22:37 2022 -0400
services: configuration: Fix typo.
* gnu/services/configuration.scm (interpose): Fix typo in doc.
(text-config?): Add a newline following definition.
---
gnu/services/configuration.scm | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/gnu/services/configuration.scm b/gnu/services/configuration.scm
index 83da63c1b3..636c49ccba 100644
--- a/gnu/services/configuration.scm
+++ b/gnu/services/configuration.scm
@@ -410,7 +410,7 @@ If NEGATE? is @code{#t}, retrieve all fields except FIELDS."
(define* (interpose ls #:optional (delimiter "\n") (grammar 'infix))
- "Same as @code{string-join}, but without join and string, returns an
+ "Same as @code{string-join}, but without join and string, returns a
DELIMITER interposed LS. Support 'infix and 'suffix GRAMMAR values."
(when (not (member grammar '(infix suffix)))
(raise
@@ -442,6 +442,7 @@ the list result in @code{#t} when applying PRED? on them."
(define (text-config? config)
(list-of file-like?))
+
(define (serialize-text-config field-name val)
#~(string-append
#$@(interpose