21/27: services: hurd: Use activation-service, hurd-etc-service.

[guix-commits]

janneke pushed a commit to branch wip-hurd-vm
in repository guix.

commit c2036eb13d36688b7933c04a44d7d1f044986006
Author: Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
AuthorDate: Sun May 3 16:37:27 2020 +0200

    services: hurd: Use activation-service, hurd-etc-service.
    
    This:
    
        ./pre-inst-env guix system disk-image --no-grafts --target=i586-pc-gnu \
            gnu/system/examples/bare-hurd.tmpl
    
    now produces a minimal working image; you may run it like so
    
        guix environment --ad-hoc qemu -- qemu-system-i386 -enable-kvm -m 512 \
         -snapshot -hda <the-image>
    
    * gnu/system.scm (hurd-default-essential-services): Add %boot-service,
    %activation-service, hurd-etc-service.
---
 gnu/system.scm | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/gnu/system.scm b/gnu/system.scm
index 50fc9da..4d23f68 100644
--- a/gnu/system.scm
+++ b/gnu/system.scm
@@ -58,6 +58,7 @@
   #:use-module (gnu services)
   #:use-module (gnu services shepherd)
   #:use-module (gnu services base)
+  #:use-module (gnu services hurd)
   #:use-module (gnu bootloader)
   #:use-module (gnu system shadow)
   #:use-module (gnu system nss)
@@ -605,6 +606,9 @@ bookkeeping."
 
 (define (hurd-default-essential-services os)
   (list (service system-service-type '())
+        %boot-service
+        %activation-service
+        (hurd-etc-service os)
         (service profile-service-type '())))
 
 (define* (operating-system-services os)