diff options
| author | Jan (janneke) Nieuwenhuizen <janneke@gnu.org> | 2020-05-03 14:13:58 +0200 |
|---|---|---|
| committer | Jan Nieuwenhuizen <janneke@gnu.org> | 2020-06-08 13:51:18 +0200 |
| commit | 45b2cb439deaa2f438aed3893ee8fc80445d5563 (patch) | |
| tree | b6c62e403c7ae959de1409def668c178bc38809c | |
| parent | c77b92859fdad2b85f0f32d920048d476a347ff0 (diff) | |
system: hurd: Add hurd-default-essential-services.
* gnu/system.scm (hurd-default-essential-services): New procedure.
| -rw-r--r-- | gnu/system.scm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/gnu/system.scm b/gnu/system.scm index 61cbaef280..79f52acc23 100644 --- a/gnu/system.scm +++ b/gnu/system.scm @@ -9,6 +9,7 @@ ;;; Copyright © 2020 Brice Waegeneire <brice@waegenei.re> ;;; Copyright © 2020 Florian Pelz <pelzflorian@pelzflorian.de> ;;; Copyright © 2020 Maxim Cournoyer <maxim.cournoyer@gmail.com> +;;; Copyright © 2020 Jan (janneke) Nieuwenhuizen <jannek@gnu.org> ;;; ;;; This file is part of GNU Guix. ;;; @@ -127,6 +128,8 @@ operating-system-with-gc-roots operating-system-with-provenance + hurd-default-essential-services + boot-parameters boot-parameters? boot-parameters-label @@ -574,6 +577,10 @@ bookkeeping." (service firmware-service-type (operating-system-firmware os))))))) +(define (hurd-default-essential-services os) + (list (service system-service-type '()) + (service profile-service-type '()))) + (define* (operating-system-services os) "Return all the services of OS, including \"essential\" services." (instantiate-missing-services |