futurile/guix-play
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

services: dbus, polkit: Add default value.

Browse Source 
* gnu/services/dbus.scm (dbus-root-service-type)[default-value]: New
field.
(polkit-service-type)[default-value]: New field.
This commit is contained in:
Ludovic Courtès 2017-07-11 00:47:57 +02:00
parent 638e9deaf8
commit 3e8d037b16
No known key found for this signature in database
GPG Key ID: 090B11993D9AEBB5
1 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
gnu/services/dbus.scm
View File

@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU ;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2013, 2014, 2015, 2016 Ludovic Courtès <ludo@gnu.org> ;;; Copyright © 2013, 2014, 2015, 2016, 2017 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2015 Sou Bunnbu <iyzsong@gmail.com> ;;; Copyright © 2015 Sou Bunnbu <iyzsong@gmail.com>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
@ -205,7 +205,9 @@ includes the @code{etc/dbus-1/system.d} directories of each package listed in
(inherit config) (inherit config)
(services (services
(append (dbus-configuration-services config) (append (dbus-configuration-services config)
services))))))) services)))))
(default-value (dbus-configuration))))
(define* (dbus-service #:key (dbus dbus) (services '())) (define* (dbus-service #:key (dbus dbus) (services '()))
"Return a service that runs the \"system bus\", using @var{dbus}, with "Return a service that runs the \"system bus\", using @var{dbus}, with
@ -297,7 +299,9 @@ and policy files. For example, to allow avahi-daemon to use the system bus,
(inherit config) (inherit config)
(actions (actions
(append (polkit-configuration-actions config) (append (polkit-configuration-actions config)
actions))))))) actions)))))
(default-value (polkit-configuration))))
(define* (polkit-service #:key (polkit polkit)) (define* (polkit-service #:key (polkit polkit))
"Return a service that runs the "Return a service that runs the