[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
02/20: services: herd: Allow to pass arguments to start-service.
From: |
guix-commits |
Subject: |
02/20: services: herd: Allow to pass arguments to start-service. |
Date: |
Wed, 5 Dec 2018 01:28:53 -0500 (EST) |
mothacehe pushed a commit to branch wip-newt-installer
in repository guix.
commit afe42d71237fd4b2b6f3c74512e6975fccf1da26
Author: Mathieu Othacehe <address@hidden>
Date: Wed Dec 5 14:13:38 2018 +0900
services: herd: Allow to pass arguments to start-service.
* gnu/services/herd.scm (start-service)[arguments]: New optional argument.
---
gnu/services/herd.scm | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/gnu/services/herd.scm b/gnu/services/herd.scm
index 8ff8177..9fe757f 100644
--- a/gnu/services/herd.scm
+++ b/gnu/services/herd.scm
@@ -252,9 +252,10 @@ when passed a service with an already-registered name."
services
(remove registered? services))))))
-(define (start-service name)
- (with-shepherd-action name ('start) result
- result))
+(define* (start-service name #:optional (arguments '()))
+ (invoke-action name 'start arguments
+ (lambda (result)
+ result)))
(define (stop-service name)
(with-shepherd-action name ('stop) result
- branch wip-newt-installer updated (177029b -> 4781503), guix-commits, 2018/12/05
- 02/20: services: herd: Allow to pass arguments to start-service.,
guix-commits <=
- 05/20: build: file-systems: Export read-partition-label and read-partition-uuid., guix-commits, 2018/12/05
- 01/20: build: syscalls: Add device-in-use?., guix-commits, 2018/12/05
- 03/20: gnu: guile-newt: Update to revision 4., guix-commits, 2018/12/05
- 04/20: gnu: Add guile-parted., guix-commits, 2018/12/05
- 06/20: installer: Remove "selection" from all titles., guix-commits, 2018/12/05
- 13/20: installer: Redirect to TTY3 root shell for unguided install., guix-commits, 2018/12/05
- 07/20: installer: Add new utils., guix-commits, 2018/12/05
- 14/20: installer: Fix ethernet connection., guix-commits, 2018/12/05
- 11/20: installer: Add hostname., guix-commits, 2018/12/05
- 15/20: installer: Fix comments., guix-commits, 2018/12/05