[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[shepherd] 01/02: service: 'service->sexp' reports value of 'transient?'
From: |
Ludovic Courtès |
Subject: |
[shepherd] 01/02: service: 'service->sexp' reports value of 'transient?' field. |
Date: |
Sat, 9 Apr 2022 16:58:34 -0400 (EDT) |
civodul pushed a commit to branch master
in repository shepherd.
commit e1116ebe2b3d2475029a677e0c67a490a5cfb9c2
Author: Ludovic Courtès <ludo@gnu.org>
AuthorDate: Sat Apr 9 22:50:50 2022 +0200
service: 'service->sexp' reports value of 'transient?' field.
* modules/shepherd/service.scm (service->sexp): Report value of
'transient?' field when true.
---
modules/shepherd/service.scm | 3 +++
1 file changed, 3 insertions(+)
diff --git a/modules/shepherd/service.scm b/modules/shepherd/service.scm
index 89732ae..013347b 100644
--- a/modules/shepherd/service.scm
+++ b/modules/shepherd/service.scm
@@ -644,6 +644,9 @@ clients."
(last-respawns ,(slot-ref service 'last-respawns))
,@(if (slot-ref service 'one-shot?)
'((one-shot? #t))
+ '())
+ ,@(if (slot-ref service 'transient?)
+ '((transient? #t))
'())))
(define-method (result->sexp (service <service>))