services: herd: Use the non-deprecated form of ‘register-services’.

Passing a rest list to ‘register-services’ is deprecated since version 0.10.0
of the Shepherd.

* gnu/services/herd.scm (load-services): Pass a list to ‘register-services’.

Change-Id: Id6325259aed86d02510d4c741c0cd41c4566d3c8
This commit is contained in:
Ludovic Courtès 2025-10-19 11:27:50 +02:00
parent 713ca53090
commit 96558456df
No known key found for this signature in database
GPG key ID: 090B11993D9AEBB5

View file

@ -1,5 +1,5 @@
;;; GNU Guix --- Functional package management for GNU
;;; Copyright © 2016-2019, 2022-2023 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2016-2019, 2022-2023, 2025 Ludovic Courtès <ludo@gnu.org>
;;; Copyright © 2017, 2020 Mathieu Othacehe <m.othacehe@gmail.com>
;;; Copyright © 2023 Maxim Cournoyer <maxim@guixotic.coop>
;;;
@ -297,9 +297,9 @@ service is transient."
"Load and register the services from FILES, where FILES contain code that
returns a shepherd <service> object."
(eval-there `(register-services
,@(map (lambda (file)
`(primitive-load ,file))
files))))
(list ,@(map (lambda (file)
`(primitive-load ,file))
files)))))
(define load-services/safe
;; Deprecated. It used to behave differently before service replacements