03/03: services: guix-build-coordinator: Simpify service startup.

[guix-commits]

cbaines pushed a commit to branch master
in repository guix.

commit c229937c6ab38fa3e2a3906b0f47f9abe68553a0
Author: Christopher Baines <mail@cbaines.net>
AuthorDate: Sat May 6 12:49:01 2023 +0100

    services: guix-build-coordinator: Simpify service startup.
    
    Take advantage of changes in the build coordinator to reduce the complexity 
of
    the service startup script.
    
    * gnu/services/guix.scm (make-guix-build-coordinator-start-script): Remove 
the
    metrics registry and datastore.
---
 gnu/services/guix.scm | 11 ++---------
 1 file changed, 2 insertions(+), 9 deletions(-)

diff --git a/gnu/services/guix.scm b/gnu/services/guix.scm
index 2dfedc553e..5aa8f8f1a2 100644
--- a/gnu/services/guix.scm
+++ b/gnu/services/guix.scm
@@ -294,13 +294,7 @@
 
          (simple-format #t "starting the guix-build-coordinator:\n  ~A\n"
                         (current-filename))
-         (let* ((metrics-registry (make-metrics-registry
-                                   #:namespace
-                                   "guixbuildcoordinator"))
-                (datastore (database-uri->datastore
-                            #$database-uri-string
-                            #:metrics-registry metrics-registry))
-                (hooks
+         (let* ((hooks
                  (list #$@(map (match-lambda
                                  ((name . hook-gexp)
                                   #~(cons '#$name #$hook-gexp)))
@@ -311,9 +305,8 @@
                                ((name . _) (assq-ref hooks name)))
                              %default-hooks)))
                 (build-coordinator (make-build-coordinator
-                                    #:datastore datastore
+                                    #:database-uri-string #$database-uri-string
                                     #:hooks hooks-with-defaults
-                                    #:metrics-registry metrics-registry
                                     #:allocation-strategy 
#$allocation-strategy)))
 
            (run-coordinator-service