aboutsummaryrefslogtreecommitdiff
path: root/gnu/services.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2014-09-17 07:50:11 +0200
committerLudovic Courtès <ludo@gnu.org>2014-09-17 07:50:11 +0200
commitbebc8681c261961ceace16a7f0cfc3ebdba5a4aa (patch)
tree144aa9a56a1e2bf1b288b82ed6a6d7535229205b /gnu/services.scm
parent736755e21eb8ce04d2451fef22ead27eafe0a162 (diff)
downloadguix-bebc8681c261961ceace16a7f0cfc3ebdba5a4aa.tar
guix-bebc8681c261961ceace16a7f0cfc3ebdba5a4aa.tar.gz
services: Change default 'stop' value to #~(const #f).
* gnu/services.scm (<service>)[stop]: Change default value.
Diffstat (limited to 'gnu/services.scm')
-rw-r--r--gnu/services.scm7
1 files changed, 4 insertions, 3 deletions
diff --git a/gnu/services.scm b/gnu/services.scm
index 6bb21722b6..37ecc019ec 100644
--- a/gnu/services.scm
+++ b/gnu/services.scm
@@ -17,6 +17,7 @@
;;; along with GNU Guix. If not, see <http://www.gnu.org/licenses/>.
(define-module (gnu services)
+ #:use-module (guix gexp)
#:use-module (guix records)
#:export (service?
service
@@ -47,9 +48,9 @@
(default '()))
(respawn? service-respawn? ; Boolean
(default #t))
- (start service-start) ; g-expression
- (stop service-stop ; g-expression
- (default #f))
+ (start service-start) ; g-expression (procedure)
+ (stop service-stop ; g-expression (procedure)
+ (default #~(const #f)))
(user-accounts service-user-accounts ; list of <user-account>
(default '()))
(user-groups service-user-groups ; list of <user-groups>