summaryrefslogtreecommitdiff
path: root/gnu/system.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2019-05-10 17:45:06 +0200
committerLudovic Courtès <ludo@gnu.org>2019-05-10 23:29:18 +0200
commitf8885ecab6cdd8f25e13b43b5371260886f7b0cb (patch)
treef0c8e409e9fe4c830d14f635fbb3074fbc2a6e20 /gnu/system.scm
parent755a6027ce9347dc21cd912c4feb65c1ed0acdf7 (diff)
downloadguix-patches-f8885ecab6cdd8f25e13b43b5371260886f7b0cb.tar
guix-patches-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.
Diffstat (limited to 'gnu/system.scm')
-rw-r--r--gnu/system.scm6
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."