TakeV/guix
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

services: guix-build-coordinator: Fix service activation parts.

Browse source 
Don't hardcode usernames, as these are in the config. Also fix the %user being
missing from the queue-builds service activation.

* gnu/services/guix.scm (guix-build-coordinator-activation,
guix-build-coordinator-agent-activation): Use config for the user name.
(guix-build-coordinator-queue-builds-activation): Define %user.
This commit is contained in:
Christopher Baines 2021-04-23 13:38:49 +01:00
parent 69634ad70b
commit 51201d636a
No known key found for this signature in database
GPG key ID: 5E28A33B0B84F577
1 changed files with 10 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

12
gnu/services/guix.scm
View file

@ -329,7 +329,9 @@ (define (guix-build-coordinator-activation config)
#~(begin
(use-modules (guix build utils))
(define %user (getpw "guix-build-coordinator"))
(define %user
(getpw #$(guix-build-coordinator-configuration-user
config)))
(chmod "/var/lib/guix-build-coordinator" #o755)
@ -438,7 +440,9 @@ (define (guix-build-coordinator-agent-activation config)
#~(begin
(use-modules (guix build utils))
(define %user (getpw "guix-build-coordinator-agent"))
(define %user
(getpw #$(guix-build-coordinator-agent-configuration-user
config)))
(mkdir-p "/var/log/guix-build-coordinator")
@ -514,6 +518,10 @@ (define (guix-build-coordinator-queue-builds-activation config)
#~(begin
(use-modules (guix build utils))
(define %user
(getpw #$(guix-build-coordinator-queue-builds-configuration-user
config)))
(mkdir-p "/var/log/guix-build-coordinator")
;; Allow writing the PID file