summaryrefslogtreecommitdiff
path: root/gnu/services
diff options
context:
space:
mode:
authorBruno Victal <mirai@makinata.eu>2023-01-13 21:34:57 +0000
committerMaxim Cournoyer <maxim.cournoyer@gmail.com>2023-02-08 22:40:39 -0500
commita5f473db6f8682350b61e2c04b7580544eea0ea3 (patch)
tree18defe9c7e65baab89b7d1a4afe90f5e8cff29a5 /gnu/services
parent640d27c2d68cfc621c5b49a8b26aa2c15f3208ea (diff)
services: configuration: Format a list of packages by their names.
* gnu/services/configuration.scm (generate-documentation): Format a list of packages by their names. Signed-off-by: Maxim Cournoyer <maxim.cournoyer@gmail.com>
Diffstat (limited to 'gnu/services')
-rw-r--r--gnu/services/configuration.scm3
1 files changed, 3 insertions, 0 deletions
diff --git a/gnu/services/configuration.scm b/gnu/services/configuration.scm
index 6b0291dc00..02d1aa1796 100644
--- a/gnu/services/configuration.scm
+++ b/gnu/services/configuration.scm
@@ -34,6 +34,7 @@
#:autoload (texinfo) (texi-fragment->stexi)
#:autoload (texinfo serialize) (stexi->texi)
#:use-module (ice-9 curried-definitions)
+ #:use-module (ice-9 format)
#:use-module (ice-9 match)
#:use-module (srfi srfi-1)
#:use-module (srfi srfi-34)
@@ -370,6 +371,8 @@ DEFAULT."
(cond
((package? val)
(symbol->string (package->symbol val)))
+ (((list-of package?) val)
+ (format #f "(~{~a~^ ~})" (map package->symbol val)))
(else (str val))))
`(entry (% (heading