me
/
guix
Archived
1
0
Fork 0
Code

services: Fix the spice-vdagent service. 

* gnu/services/spice.scm (spice-vdagent-activation): Update runtime directory
from /var/run/spice-vdagentd to /run/spice-vdagentd.
(spice-vdagent-service-type): Specify a default value and fix indentation.
master
Maxim Cournoyer 2021-04-17 00:29:06 -04:00
parent b1b41a23f4
commit 6b0704339d
No known key found for this signature in database
GPG Key ID: 1260E46482E63562
1 changed files with 11 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
gnu/services/spice.scm
View File

@ -38,7 +38,7 @@
"Return the activation gexp for CONFIG." "Return the activation gexp for CONFIG."
#~(begin #~(begin
(use-modules (guix build utils)) (use-modules (guix build utils))
(mkdir-p "/var/run/spice-vdagentd"))) (mkdir-p "/run/spice-vdagentd")))
(define (spice-vdagent-shepherd-service config) (define (spice-vdagent-shepherd-service config)
"Return a <shepherd-service> for spice-vdagentd with CONFIG." "Return a <shepherd-service> for spice-vdagentd with CONFIG."
@ -61,14 +61,16 @@
(compose list spice-vdagent-configuration-spice-vdagent)) (compose list spice-vdagent-configuration-spice-vdagent))
(define spice-vdagent-service-type (define spice-vdagent-service-type
(service-type (name 'spice-vdagent) (service-type
(extensions (name 'spice-vdagent)
(list (service-extension shepherd-root-service-type (default-value (spice-vdagent-configuration))
spice-vdagent-shepherd-service) (extensions
(service-extension activation-service-type (list (service-extension shepherd-root-service-type
spice-vdagent-activation) spice-vdagent-shepherd-service)
(service-extension profile-service-type (service-extension activation-service-type
spice-vdagent-profile))))) spice-vdagent-activation)
(service-extension profile-service-type
spice-vdagent-profile)))))
(define* (spice-vdagent-service (define* (spice-vdagent-service
#:optional (config (spice-vdagent-configuration))) #:optional (config (spice-vdagent-configuration)))