services: nginx-upstream-configuration: Allow file-like objects

* gnu/services/web.scm (emit-nginx-upstream-config): Support file-like
objects.
* doc/guix.texi (Web Services)[nginx-upstream-configuration]: Document it.

Change-Id: I49996e358174dc77b31e3c91b908a6a72f3eb705
Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Tomas Volf 2024-10-06 17:22:57 +02:00 committed by Ludovic Courtès
parent 123dcaefe9
commit ad09bf9638
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5
2 changed files with 14 additions and 3 deletions

View file

@ -704,8 +704,10 @@ of index files."
(cons
"\n"
(map (lambda (line)
(simple-format #f " ~A\n" line))
(flatten extra-content)))
`(" " ,line "\n"))
(if (list? extra-content)
extra-content
(list extra-content))))
'()))
" }\n"))