summaryrefslogtreecommitdiff
path: root/gnu/services/herd.scm
diff options
context:
space:
mode:
Diffstat (limited to 'gnu/services/herd.scm')
-rw-r--r--gnu/services/herd.scm14
1 files changed, 4 insertions, 10 deletions
diff --git a/gnu/services/herd.scm b/gnu/services/herd.scm
index 06361ba49e..d276ba1b74 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 <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>
;;;
@@ -58,7 +58,6 @@
unload-services
unload-service
load-services
- load-services/safe
start-service
stop-service
restart-service
@@ -297,14 +296,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))))
-
-(define load-services/safe
- ;; Deprecated. It used to behave differently before service replacements
- ;; were a thing.
- load-services)
+ (list ,@(map (lambda (file)
+ `(primitive-load ,file))
+ files)))))
(define* (start-service name #:optional (arguments '()))
(invoke-action name 'start arguments