From a5f473db6f8682350b61e2c04b7580544eea0ea3 Mon Sep 17 00:00:00 2001 From: Bruno Victal Date: Fri, 13 Jan 2023 21:34:57 +0000 Subject: 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 --- gnu/services/configuration.scm | 3 +++ 1 file changed, 3 insertions(+) (limited to 'gnu/services/configuration.scm') 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 -- cgit v1.2.3