04/36: HACK services: Add user-processes-service as a Hurd service.

[guix-commits]

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

commit 3d3353793056ddbfcd8d9433ba0ed75203e14171
Author: Jan (janneke) Nieuwenhuizen <address@hidden>
AuthorDate: Mon Apr 13 11:04:09 2020 +0200

    HACK services: Add user-processes-service as a Hurd service.
    
    TODO Remove/make it work with the Hurd.  This dummy is currently used to
    satisfy
    
        guix build: error: service 'XXX' requires 'user-processes', which is 
not provided by any service
    
    and then filtered-out.
    
    The `guix-daemon' service type depends on `user-services'.
    
    * gnu/services/hurd.scm (user-services-shepherd-service): New variable.
    (hurd-service->shepherd-service): Add entry.
---
 gnu/services/hurd.scm | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/gnu/services/hurd.scm b/gnu/services/hurd.scm
index 4f32cce..d0248c6 100644
--- a/gnu/services/hurd.scm
+++ b/gnu/services/hurd.scm
@@ -44,6 +44,7 @@
     (match config
       (($ <hurd-console-configuration>) (hurd-console-shepherd-service config))
       (($ <hurd-ttys-configuration>) (hurd-ttys-shepherd-service config))
+      (('user-processes) (user-processes-shepherd-service '()))
       (_ '()))))
 
 (define (first-of-two first second)
@@ -51,6 +52,14 @@
 
 
 ;;;
+;;; Bridge for user-processes service, required for guix-daemon.
+;;;
+
+(define user-processes-shepherd-service
+  (@@ (gnu services shepherd) user-processes-shepherd-service))
+
+
+;;;
 ;;; Simple wrapper for <hurd>/bin/console.
 ;;;