nixo
/
guix-devel
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

services: desktop: Create /var/run/udisks2 for the udisks service. 

* gnu/services/desktop.scm (%udisks-activation): New variable.
  (udisks-service-type)[extensions]: Extend the activation service type with
  %udisks-activation.
This commit is contained in:
Christopher Baines 2017-11-24 23:08:14 +00:00
parent 080e023d45
commit 5823396404
No known key found for this signature in database
GPG Key ID: 5E28A33B0B84F577
1 changed files with 11 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
gnu/services/desktop.scm
View File

@ -507,6 +507,15 @@ site} for more information."
(udisks udisks-configuration-udisks
(default udisks)))
(define %udisks-activation
(with-imported-modules '((guix build utils))
#~(begin
(use-modules (guix build utils))
(let ((run-dir "/var/run/udisks2"))
(mkdir-p run-dir)
(chmod run-dir #o700)))))
(define udisks-service-type
(let ((udisks-package (lambda (config)
(list (udisks-configuration-udisks config)))))
@ -518,6 +527,8 @@ site} for more information."
udisks-package)
(service-extension udev-service-type
udisks-package)
(service-extension activation-service-type
(const %udisks-activation))
;; Profile 'udisksctl' & co. in the system profile.
(service-extension profile-service-type