summary refs log tree commit diff
path: root/gnu/services.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2022-05-13 23:39:17 +0200
committerLudovic Courtès <ludo@gnu.org>2022-05-18 22:29:54 +0200
commit9a5d68692314bebd16dbcdc0d4e4e52fa4d5812f (patch)
treef5dbc86ba6681ca689571658ad6c9187d11b482b /gnu/services.scm
parent1f3a155548c1203480bfb7fceed82acfe9087ce1 (diff)
downloadguix-9a5d68692314bebd16dbcdc0d4e4e52fa4d5812f.tar.gz
services: Add more description fields.
* gnu/services.scm (simple-service): Add 'description' field.
* gnu/services/base.scm (udev-rules-service): Likewise.
* gnu/system/install.scm (configuration-template-service-type): Likewise.
* gnu/tests.scm (marionette-service-type): Likewise.
Diffstat (limited to 'gnu/services.scm')
-rw-r--r--gnu/services.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/gnu/services.scm b/gnu/services.scm
index e3d4fcc232..234ee372b8 100644
--- a/gnu/services.scm
+++ b/gnu/services.scm
@@ -292,7 +292,8 @@ for service of type '~a'")
 singleton service type NAME, of which the returned service is an instance."
   (let* ((extension (service-extension target identity))
          (type      (service-type (name name)
-                                  (extensions (list extension)))))
+                                  (extensions (list extension))
+                                  (description "This is a simple service."))))
     (service type value)))
 
 (define-syntax %modify-service