janneke pushed a commit to branch wip-hurd-vm
in repository guix.
commit 7b9820fc99efe22807b0b5dcb4357765a9171779
Author: Jan (janneke) Nieuwenhuizen <[email protected]>
AuthorDate: Sun Apr 19 13:26:45 2020 +0200
services: Add openssh-service as a Hurd service.
* gnu/services/hurd.scm (<openssh-configuration>, openssh-shepherd-service):
New variable.
(hurd-service->shepherd-service): Add entry.
---
gnu/services/hurd.scm | 13 +++++++++++++
1 file changed, 13 insertions(+)
diff --git a/gnu/services/hurd.scm b/gnu/services/hurd.scm
index 5b3fabd..820c4cc 100644
--- a/gnu/services/hurd.scm
+++ b/gnu/services/hurd.scm
@@ -18,6 +18,7 @@
(define-module (gnu services hurd)
#:use-module (gnu packages hurd)
+ #:use-module (gnu packages ssh)
#:use-module (gnu services)
#:use-module (gnu services base)
#:use-module (gnu services shepherd)
@@ -48,6 +49,7 @@
(($ <guix-configuration>) (guix-shepherd-service config))
(($ <hurd-console-configuration>) (hurd-console-shepherd-service config))
(($ <hurd-ttys-configuration>) (hurd-ttys-shepherd-service config))
+ (($ <openssh-configuration>) (openssh-shepherd-service config))
(($ <syslog-configuration>) (syslog-shepherd-service config))
(('loopback) (hurd-loopback-shepherd-service #f))
(('user-processes) (hurd-user-processes-shepherd-service #f))
@@ -209,4 +211,15 @@ Hurd.")))
(extend append)
(default-value (hurd-ttys-configuration))))
+
+;;;
+;;; Bridge for OpenSSH.
+;;;
+
+(define <openssh-configuration>
+ (@@ (gnu services ssh) <openssh-configuration>))
+
+(define openssh-shepherd-service
+ (@@ (gnu services ssh) openssh-shepherd-service))
+
;;; hurd.scm ends here
