FIXUP server argument before its flags

This commit is contained in:
Saku Laesvuori 2025-04-19 18:09:46 +03:00
parent af5729b5f8
commit a98b362cbd
Signed by: slaesvuo
GPG Key ID: 257D284A2A1D3A32

View File

@ -76,13 +76,14 @@ the tiedote.md user on this system.")
"--sender-name" #$sender-name "--sender-name" #$sender-name
"--sendmail" #$sendmail-path "--sendmail" #$sendmail-path
"--socket" #$socket-path "--socket" #$socket-path
"server"
"--repository" repo-path "--repository" repo-path
"--port" #$(number->string port) "--port" #$(number->string port)
"--remote-url" #$remote-url "--remote-url" #$remote-url
;,@(if #$(maybe-value-set? remote-branch) ;,@(if #$(maybe-value-set? remote-branch)
; (list "--remote-branch" #$remote-branch) ; (list "--remote-branch" #$remote-branch)
; '()) ; '())
"server") )
#:user "tiedote.md" #:user "tiedote.md"
#:group "tiedote.md" #:group "tiedote.md"
#:directory #$state-directory)))) #:directory #$state-directory))))