From 96558456df41acbbff20c96328eeb50f43f7bf83 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Ludovic=20Court=C3=A8s?= Date: Sun, 19 Oct 2025 11:27:50 +0200 Subject: [PATCH] =?UTF-8?q?services:=20herd:=20Use=20the=20non-deprecated?= =?UTF-8?q?=20form=20of=20=E2=80=98register-services=E2=80=99.?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit 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 --- gnu/services/herd.scm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/gnu/services/herd.scm b/gnu/services/herd.scm index 06361ba49ef..46fbe1fc983 100644 --- a/gnu/services/herd.scm +++ b/gnu/services/herd.scm @@ -1,5 +1,5 @@ ;;; GNU Guix --- Functional package management for GNU -;;; Copyright © 2016-2019, 2022-2023 Ludovic Courtès +;;; Copyright © 2016-2019, 2022-2023, 2025 Ludovic Courtès ;;; Copyright © 2017, 2020 Mathieu Othacehe ;;; Copyright © 2023 Maxim Cournoyer ;;; @@ -297,9 +297,9 @@ service is transient." "Load and register the services from FILES, where FILES contain code that returns a shepherd 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