[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/06: services: Don't use the deprecated 'make-forkexec-constructor' ca
From: |
guix-commits |
Subject: |
02/06: services: Don't use the deprecated 'make-forkexec-constructor' call. |
Date: |
Mon, 20 Apr 2020 18:06:52 -0400 (EDT) |
civodul pushed a commit to branch master
in repository guix.
commit 7d903d2ff7e17406c0650541f35e37a99dab8759
Author: Ludovic Courtès <address@hidden>
AuthorDate: Mon Apr 20 19:36:41 2020 +0200
services: Don't use the deprecated 'make-forkexec-constructor' call.
Passing 'make-forkexec-constructor' a string or several string arguments
has been deprecated since dmd 0.1.
* gnu/services/base.scm (rngd-service-type): In 'start' method, pass a
list as the first argument to 'make-forkexec-constructor'.
* gnu/services/desktop.scm (bluetooth-shepherd-service): Likewise.
* gnu/services/spice.scm (spice-vdagent-shepherd-service): Likewise.
---
gnu/services/base.scm | 2 +-
gnu/services/desktop.scm | 4 ++--
gnu/services/spice.scm | 2 +-
3 files changed, 4 insertions(+), 4 deletions(-)
diff --git a/gnu/services/base.scm b/gnu/services/base.scm
index 094bc52..d7f3c30 100644
--- a/gnu/services/base.scm
+++ b/gnu/services/base.scm
@@ -557,7 +557,7 @@ down.")))
(documentation "Add TRNG to entropy pool.")
(requirement '(udev))
(provision '(trng))
- (start #~(make-forkexec-constructor #$@rngd-command))
+ (start #~(make-forkexec-constructor '#$rngd-command))
(stop #~(make-kill-destructor))))))
(define* (rngd-service #:key
diff --git a/gnu/services/desktop.scm b/gnu/services/desktop.scm
index 8663243..e165d87 100644
--- a/gnu/services/desktop.scm
+++ b/gnu/services/desktop.scm
@@ -452,8 +452,8 @@ site} for more information."
(requirement '(dbus-system udev))
(documentation "Run the bluetoothd daemon.")
(start #~(make-forkexec-constructor
- (string-append #$(bluetooth-configuration-bluez config)
- "/libexec/bluetooth/bluetoothd")))
+ (list #$(file-append (bluetooth-configuration-bluez config)
+ "/libexec/bluetooth/bluetoothd"))))
(stop #~(make-kill-destructor))))
(define bluetooth-service-type
diff --git a/gnu/services/spice.scm b/gnu/services/spice.scm
index 8a835fe..fd85dc2 100644
--- a/gnu/services/spice.scm
+++ b/gnu/services/spice.scm
@@ -54,7 +54,7 @@
(documentation "Spice vdagentd service")
(requirement '(udev))
(provision '(spice-vdagentd))
- (start #~(make-forkexec-constructor #$@spice-vdagentd-command))
+ (start #~(make-forkexec-constructor '#$spice-vdagentd-command))
(stop #~(make-kill-destructor)))))
(define spice-vdagent-profile
- branch master updated (b023a8a -> c8d8f61), guix-commits, 2020/04/20
- 01/06: gnu: mcron: Remove now unneeded phase., guix-commits, 2020/04/20
- 05/06: Revert "system: Don’t create a module database when no modules are available.", guix-commits, 2020/04/20
- 06/06: packages: Recommend against the use of 'package-file'., guix-commits, 2020/04/20
- 03/06: services: dovecot: 'stop' method returns #f upon success., guix-commits, 2020/04/20
- 04/06: services: etc: Detect and report duplicate entries., guix-commits, 2020/04/20
- 02/06: services: Don't use the deprecated 'make-forkexec-constructor' call.,
guix-commits <=