services: nginx: Fix multiple index and server name.

* gnu/services/web.scm (config-domain-strings, config-index-string): separate
names with a space.

Signed-off-by: Ludovic Courtès <ludo@gnu.org>
This commit is contained in:
Julien Lepiller 2016-12-13 20:48:16 +01:00 committed by Ludovic Courtès
parent 3b9b12ef49
commit 4e9ae301ce
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -74,8 +74,8 @@ (define (config-domain-strings names)
of domain names."
(string-join
(map (match-lambda
('default "_")
((? string? str) str))
('default "_ ")
((? string? str) (string-append str " ")))
names)))
(define (config-index-strings names)
@ -83,7 +83,7 @@ (define (config-index-strings names)
of index files."
(string-join
(map (match-lambda
((? string? str) str))
((? string? str) (string-append str " ")))
names)))
(define (default-nginx-server-config server)