janneke pushed a commit to branch wip-hurd-vm in repository guix. commit ee4112ff2106c8c283f0cf292084c217729218a7 Author: Jan (janneke) Nieuwenhuizen <jann...@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; populate profile with packages. --- gnu/system.scm | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/gnu/system.scm b/gnu/system.scm index b814181..6642985 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) @@ -608,7 +609,10 @@ bookkeeping." (define (hurd-default-essential-services os) (list (service system-service-type '()) - (service profile-service-type '()))) + %boot-service + %activation-service + (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."