From 6ddf4fcfaeff8c9c1c6bd43c172ca33fe6d62c73 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Wed, 12 Apr 2017 14:08:33 +0200 Subject: [PATCH] services: Define '%linux-bare-metal-service' using 'simple-service'. * gnu/services.scm (linux-bare-metal-service-type): Remove. (%linux-bare-metal-service): Define in terms of 'simple-service'. --- gnu/services.scm | 11 ++++------- 1 file changed, 4 insertions(+), 7 deletions(-) diff --git a/gnu/services.scm b/gnu/services.scm index 6c88f2621b..9f6e323e18 100644 --- a/gnu/services.scm +++ b/gnu/services.scm @@ -403,16 +403,13 @@ (define %linux-kernel-activation ;; Let users debug their own processes! (activate-ptrace-attach))) -(define linux-bare-metal-service-type - (service-type (name 'linux-bare-metal) - (extensions - (list (service-extension activation-service-type - (const %linux-kernel-activation)))))) - (define %linux-bare-metal-service ;; The service that does things that are needed on the "bare metal", but not ;; necessary or impossible in a container. - (service linux-bare-metal-service-type #f)) + (simple-service 'linux-bare-metal + activation-service-type + %linux-kernel-activation)) + (define special-files-service-type ;; Service to install "special files" such as /bin/sh and /usr/bin/env.