From fdaacbad85a23f89db9431477684fb1333de03f3 Mon Sep 17 00:00:00 2001
From: Ludovic Courtès <ludo@gnu.org>
Date: Mon, 10 Nov 2014 23:23:32 +0100
Subject: services: Add 'auto-start?' field to <service>.

* gnu/services.scm (<service>)[auto-start?]: New field.
* gnu/services/dmd.scm (dmd-configuration-file): Honor it.
* gnu/system/install.scm (cow-store-service): Add 'auto-start?' field.
---
 gnu/services.scm | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'gnu/services.scm')

diff --git a/gnu/services.scm b/gnu/services.scm
index 37ecc019ec..43e51b998c 100644
--- a/gnu/services.scm
+++ b/gnu/services.scm
@@ -27,6 +27,7 @@
             service-respawn?
             service-start
             service-stop
+            service-auto-start?
             service-activate
             service-user-accounts
             service-user-groups
@@ -51,6 +52,8 @@
   (start         service-start)                   ; g-expression (procedure)
   (stop          service-stop                     ; g-expression (procedure)
                  (default #~(const #f)))
+  (auto-start?   service-auto-start?              ; Boolean
+                 (default #t))
   (user-accounts service-user-accounts            ; list of <user-account>
                  (default '()))
   (user-groups   service-user-groups              ; list of <user-groups>
-- 
cgit v1.2.3