01/02: squash! system: hurd: Initial (gnu services) generated shepherd.conf.

[guix-commits]

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

commit 0f906791dcd0231b96cf4d9793263f2ff2b53958
Author: Jan (janneke) Nieuwenhuizen <address@hidden>
AuthorDate: Mon Apr 13 21:13:25 2020 +0200

    squash! system: hurd: Initial (gnu services) generated shepherd.conf.
---
 gnu/system/hurd.scm | 51 +++++++++++++++++++++------------------------------
 1 file changed, 21 insertions(+), 30 deletions(-)

diff --git a/gnu/system/hurd.scm b/gnu/system/hurd.scm
index e2aa48d..e03d7eb 100644
--- a/gnu/system/hurd.scm
+++ b/gnu/system/hurd.scm
@@ -69,36 +69,27 @@
         net-base inetutils openssh shepherd))
 
 (define %base-services/hurd
-  (let ((hurd (with-parameters ((%current-target-system
-                                 "i586-pc-gnu"))
-                hurd))
-        (guix (with-parameters ((%current-target-system
-                                 "i586-pc-gnu"))
-                guix))
-        (openssh (with-parameters ((%current-target-system
-                                 "i586-pc-gnu"))
-                openssh)))
-    (list (service hurd-user-processes-service-type)
-          (service hurd-console-service-type
-                   (hurd-console-configuration (hurd hurd)))
-          (service hurd-ttys-service-type
-                   (hurd-ttys-configuration (hurd hurd)))
-          (service hurd-ssh-service-type
-                   (openssh-configuration
-                    (use-pam? #f)
-                    (openssh openssh)
-                    (port-number 2222)
-                    (permit-root-login #t)
-                    (allow-empty-passwords? #t)
-                    (password-authentication? #t)))
-          (service guix-service-type
-                   (guix-configuration
-                    (guix guix)
-                    (extra-options '("--disable-chroot"
-                                     "--disable-deduplication"
-                                     "--max-jobs=1"))))
-          (service hurd-console-service-type
-                   (hurd-console-configuration (hurd hurd) (fancy? #t))))))
+  (list (service hurd-user-processes-service-type)
+        (service hurd-console-service-type
+                 (hurd-console-configuration (hurd hurd)))
+        (service hurd-ttys-service-type
+                 (hurd-ttys-configuration (hurd hurd)))
+        (service hurd-ssh-service-type
+                 (openssh-configuration
+                  (use-pam? #f)
+                  (openssh openssh)
+                  (port-number 2222)
+                  (permit-root-login #t)
+                  (allow-empty-passwords? #t)
+                  (password-authentication? #t)))
+        (service guix-service-type
+                 (guix-configuration
+                  (guix guix)
+                  (extra-options '("--disable-chroot"
+                                   "--disable-deduplication"
+                                   "--max-jobs=1"))))
+        (service hurd-console-service-type
+                 (hurd-console-configuration (hurd hurd) (fancy? #t)))))
 
 (define %hurd-os
   (operating-system