diff options
author | Ludovic Courtès <ludo@gnu.org> | 2019-05-10 17:45:06 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2019-05-10 23:29:18 +0200 |
commit | f8885ecab6cdd8f25e13b43b5371260886f7b0cb (patch) | |
tree | f0c8e409e9fe4c830d14f635fbb3074fbc2a6e20 | |
parent | 755a6027ce9347dc21cd912c4feb65c1ed0acdf7 (diff) | |
download | guix-f8885ecab6cdd8f25e13b43b5371260886f7b0cb.tar.gz |
system: Export 'operating-system-default-essential-services'.
* gnu/system.scm (essential-services): Rename to... (operating-system-default-essential-services): ... this. (<operating-system>)[essential-services]: Adjust accordingly.
-rw-r--r-- | gnu/system.scm | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/gnu/system.scm b/gnu/system.scm index 0489b9720d..2c4ca55ffc 100644 --- a/gnu/system.scm +++ b/gnu/system.scm @@ -72,6 +72,7 @@ operating-system-bootloader operating-system-services operating-system-essential-services + operating-system-default-essential-services operating-system-user-services operating-system-packages operating-system-host-name @@ -213,7 +214,8 @@ (essential-services operating-system-essential-services ; list of services (thunked) - (default (essential-services this-operating-system))) + (default (operating-system-default-essential-services + this-operating-system))) (services operating-system-user-services ; list of services (default %base-services)) @@ -463,7 +465,7 @@ value of the SYSTEM-SERVICE-TYPE service." ("initrd" ,initrd) ("locale" ,locale)))))) ;used by libc -(define* (essential-services os) +(define (operating-system-default-essential-services os) "Return the list of essential services for OS. These are special services that implement part of what's declared in OS are responsible for low-level bookkeeping." |