~abcdw/rde

77bf57ba4f977af437fbaabff5e14bc09fb2eccd — Andrew Tropin 2 months ago 8ec9988
rde: desktop-services: Add default-desktop-services argument.
1 files changed, 2 insertions(+), 1 deletions(-)

M rde/features/base.scm
M rde/features/base.scm => rde/features/base.scm +2 -1
@@ 208,6 208,7 @@ be a symbol, which will be used to construct feature name."

(define* (feature-desktop-services
          #:key
          (default-desktop-services %rde-desktop-services)
          (dbus dbus))
  "Provides desktop system services."
  (define (get-home-services _)


@@ 237,7 238,7 @@ be a symbol, which will be used to construct feature name."
                                                (getenv "HOME")))
                                    "/dbus.log"))))))))
  (define (get-system-services _)
    %rde-desktop-services)
    default-desktop-services)

  (feature
   (name 'desktop-services)