civodul pushed a commit to branch main
in repository shepherd.
commit 3d07b5a32ec02bc58c0a335e5e7be80da3064657
Author: Ludovic Courtès <[email protected]>
AuthorDate: Sun Apr 13 21:55:38 2025 +0200
service: Improve “invalid service provision list” message.
* modules/shepherd/service.scm (service): Show ‘provision’ value in
error message.
Reported-by: Daniel Littlewood <[email protected]>
---
modules/shepherd/service.scm | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/modules/shepherd/service.scm b/modules/shepherd/service.scm
index 4cecf68..2e39b72 100644
--- a/modules/shepherd/service.scm
+++ b/modules/shepherd/service.scm
@@ -401,7 +401,9 @@ denoting what the service provides."
documentation #f))
(_
(raise (condition
- (&message (message "invalid service provision list")))))))
+ (&message
+ (message (format #f (l10n "~s: invalid service provision list")
+ provision))))))))
(define (service-control service) ;internal
"Return the controlling channel of @var{service}."