guix-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

03/03: services: dbus, polkit: Add default value.


From: Ludovic Courtès
Subject: 03/03: services: dbus, polkit: Add default value.
Date: Mon, 10 Jul 2017 18:49:29 -0400 (EDT)

civodul pushed a commit to branch master
in repository guix.

commit 3e8d037b168f101aa4691f0f963e6084e0f37df7
Author: Ludovic Courtès <address@hidden>
Date:   Tue Jul 11 00:47:57 2017 +0200

    services: dbus, polkit: Add default value.
    
    * gnu/services/dbus.scm (dbus-root-service-type)[default-value]: New
    field.
    (polkit-service-type)[default-value]: New field.
---
 gnu/services/dbus.scm | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/gnu/services/dbus.scm b/gnu/services/dbus.scm
index 26390a4..360a8af 100644
--- a/gnu/services/dbus.scm
+++ b/gnu/services/dbus.scm
@@ -1,5 +1,5 @@
 ;;; GNU Guix --- Functional package management for GNU
-;;; Copyright © 2013, 2014, 2015, 2016 Ludovic Courtès <address@hidden>
+;;; Copyright © 2013, 2014, 2015, 2016, 2017 Ludovic Courtès <address@hidden>
 ;;; Copyright © 2015 Sou Bunnbu <address@hidden>
 ;;;
 ;;; 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)
                            (services
                             (append (dbus-configuration-services config)
-                                    services)))))))
+                                    services)))))
+
+                (default-value (dbus-configuration))))
 
 (define* (dbus-service #:key (dbus dbus) (services '()))
   "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)
                            (actions
                             (append (polkit-configuration-actions config)
-                                    actions)))))))
+                                    actions)))))
+
+                (default-value (polkit-configuration))))
 
 (define* (polkit-service #:key (polkit polkit))
   "Return a service that runs the



reply via email to

[Prev in Thread] Current Thread [Next in Thread]