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.
This commit is contained in:
parent
755a6027ce
commit
f8885ecab6
|
@ -72,6 +72,7 @@
|
||||||
operating-system-bootloader
|
operating-system-bootloader
|
||||||
operating-system-services
|
operating-system-services
|
||||||
operating-system-essential-services
|
operating-system-essential-services
|
||||||
|
operating-system-default-essential-services
|
||||||
operating-system-user-services
|
operating-system-user-services
|
||||||
operating-system-packages
|
operating-system-packages
|
||||||
operating-system-host-name
|
operating-system-host-name
|
||||||
|
@ -213,7 +214,8 @@
|
||||||
|
|
||||||
(essential-services operating-system-essential-services ; list of services
|
(essential-services operating-system-essential-services ; list of services
|
||||||
(thunked)
|
(thunked)
|
||||||
(default (essential-services this-operating-system)))
|
(default (operating-system-default-essential-services
|
||||||
|
this-operating-system)))
|
||||||
(services operating-system-user-services ; list of services
|
(services operating-system-user-services ; list of services
|
||||||
(default %base-services))
|
(default %base-services))
|
||||||
|
|
||||||
|
@ -463,7 +465,7 @@ value of the SYSTEM-SERVICE-TYPE service."
|
||||||
("initrd" ,initrd)
|
("initrd" ,initrd)
|
||||||
("locale" ,locale)))))) ;used by libc
|
("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
|
"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
|
that implement part of what's declared in OS are responsible for low-level
|
||||||
bookkeeping."
|
bookkeeping."
|
||||||
|
|
Loading…
Reference in New Issue