[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
29/36: services: hurd: Move hurd-default-essential-services.
From: |
guix-commits |
Subject: |
29/36: services: hurd: Move hurd-default-essential-services. |
Date: |
Mon, 27 Apr 2020 06:19:51 -0400 (EDT) |
janneke pushed a commit to branch wip-hurd-vm
in repository guix.
commit f4f872a4402a31cb9900b6e475f84e4fe056aba5
Author: Jan (janneke) Nieuwenhuizen <address@hidden>
AuthorDate: Sat Apr 25 12:02:01 2020 +0200
services: hurd: Move hurd-default-essential-services.
* gnu/system/hurd.scm: Move hurd-essential-services
(hurd-essential-services): from here ...
(operating-system-accounts): , updating user,
* gnu/system.scm (hurd-default-essential-services): to here.
---
gnu/system.scm | 19 ++++++++++++++++++-
gnu/system/hurd.scm | 16 +---------------
2 files changed, 19 insertions(+), 16 deletions(-)
diff --git a/gnu/system.scm b/gnu/system.scm
index 5491a68..bee3d4e 100644
--- a/gnu/system.scm
+++ b/gnu/system.scm
@@ -38,6 +38,7 @@
#:use-module (gnu packages bash)
#:use-module (gnu packages guile)
#:use-module (gnu packages guile-xyz)
+ #:use-module (gnu packages hurd)
#:use-module (gnu packages admin)
#:use-module (gnu packages linux)
#:use-module (gnu packages pciutils)
@@ -51,8 +52,9 @@
#:use-module (gnu packages compression)
#:use-module (gnu packages firmware)
#:use-module (gnu services)
- #:use-module (gnu services shepherd)
#:use-module (gnu services base)
+ #:use-module (gnu services hurd)
+ #:use-module (gnu services shepherd)
#:use-module (gnu bootloader)
#:use-module (gnu system shadow)
#:use-module (gnu system nss)
@@ -124,6 +126,8 @@
operating-system-with-gc-roots
operating-system-with-provenance
+ hurd-default-essential-services
+
boot-parameters
boot-parameters?
boot-parameters-label
@@ -560,6 +564,19 @@ bookkeeping."
(service firmware-service-type
(operating-system-firmware os)))))))
+(define (hurd-default-essential-services os)
+ (list (service system-service-type '())
+ %boot-service
+ %shepherd-root-service
+ %activation-service
+ (account-service (append (operating-system-accounts os)
+ (operating-system-groups os))
+ (operating-system-skeletons os))
+ (pam-root-service (operating-system-pam-services os))
+ (hurd-etc-service os)
+ (service profile-service-type
+ (operating-system-packages os))))
+
(define* (operating-system-services os)
"Return all the services of OS, including \"essential\" services."
(instantiate-missing-services
diff --git a/gnu/system/hurd.scm b/gnu/system/hurd.scm
index 6dd83e6..cf3ac14 100644
--- a/gnu/system/hurd.scm
+++ b/gnu/system/hurd.scm
@@ -107,7 +107,7 @@
(swap-devices '())
(timezone "GNUrope")
(name-service-switch #f)
- (essential-services (hurd-essential-services this-operating-system))
+ (essential-services (hurd-default-essential-services
this-operating-system))
(services (cons (service openssh-service-type
(openssh-configuration
(use-pam? #f)
@@ -145,20 +145,6 @@
(define operating-system-etc-directory
(@@ (gnu system) operating-system-etc-directory))
-(define (hurd-essential-services os)
- (list (service system-service-type '() ;;entries
- )
- %boot-service
- %shepherd-root-service
- %activation-service
- (account-service (append (operating-system-accounts os)
- (operating-system-groups os))
- (operating-system-skeletons os))
- (pam-root-service (operating-system-pam-services os))
- (hurd-etc-service os)
- (service profile-service-type
- (operating-system-packages os))))
-
(define (hurd-shepherd-services os)
(append-map hurd-service->shepherd-service (operating-system-services os)))
- 12/36: services: Add hurd., (continued)
- 12/36: services: Add hurd., guix-commits, 2020/04/27
- 15/36: services: Add user-processes-service as a Hurd service., guix-commits, 2020/04/27
- 20/36: system: hurd: Add the Shepherd., guix-commits, 2020/04/27
- 22/36: system: hurd: Add openssh service., guix-commits, 2020/04/27
- 21/36: system: gnu: Populate "/etc" from "/boot/activation"., guix-commits, 2020/04/27
- 17/36: services: hurd: Add dummy syslog., guix-commits, 2020/04/27
- 16/36: services: Add guix-daemon-service as a Hurd service., guix-commits, 2020/04/27
- 18/36: services: hurd: Add dummy loopback., guix-commits, 2020/04/27
- 25/36: system: hurd: Add guix., guix-commits, 2020/04/27
- 28/36: services: Add hurd-file-systems-service-type., guix-commits, 2020/04/27
- 29/36: services: hurd: Move hurd-default-essential-services.,
guix-commits <=
- 32/36: system: hurd: Add hurd-grub-configuration-file., guix-commits, 2020/04/27
- 33/36: system: hurd: Add hurd-grub-minimal-bootloader., guix-commits, 2020/04/27
- 23/36: system: hurd: Create system profile for guix development., guix-commits, 2020/04/27
- 30/36: system: hurd: Export system variables., guix-commits, 2020/04/27
- 27/36: services: hurd: Move hurd-etc-sevcices., guix-commits, 2020/04/27
- 09/36: gnu: Add libtirpc/hurd., guix-commits, 2020/04/27
- 31/36: services: hurd: Use hurd-file-systems-service., guix-commits, 2020/04/27
- 35/36: system: vm: Add defaults for the Hurd., guix-commits, 2020/04/27
- 24/36: system: gnu: Add %bootstrap-{gcc, binutils, glibc} for devel profile., guix-commits, 2020/04/27
- 34/36: system: Add hurd-operating-system-directory-base-entries., guix-commits, 2020/04/27