me
/
guix
Archived
1
0
Fork 0
Code

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

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