From a9dcd548fb0cc807a6394bfb8efe89a679da64a0 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Fri, 21 Mar 2025 13:29:18 +0100 Subject: [PATCH] =?UTF-8?q?services:=20cuirass:=20Really=20allow=20?= =?UTF-8?q?=E2=80=98parameters=E2=80=99=20to=20be=20a=20file-like=20object?= =?UTF-8?q?.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit This is a followup to 72381149119e4541f16024fe5616aca022373525. * gnu/services/cuirass.scm (cuirass-shepherd-service): Turn ‘--parameters=’ bit into a gexp. Change-Id: I5dd886b90ecea45157873e9c701e34988d6d31cc --- gnu/services/cuirass.scm | 10 ++++------ 1 file changed, 4 insertions(+), 6 deletions(-) diff --git a/gnu/services/cuirass.scm b/gnu/services/cuirass.scm index fcbb8c1997..87faf9255b 100644 --- a/gnu/services/cuirass.scm +++ b/gnu/services/cuirass.scm @@ -220,9 +220,8 @@ "--listen" #$host "--port" #$(number->string port) #$@(if parameters - (list (string-append - "--parameters=" - parameters)) + (list #~(string-append "--parameters=" + #$parameters)) '()) #$@web-extra-options) @@ -259,9 +258,8 @@ (number->string publish-port))) '()) #$@(if parameters - (list (string-append - "--parameters=" - parameters)) + (list #~(string-append "--parameters=" + #$parameters)) '()) #$@(if trigger-url (list