summaryrefslogtreecommitdiff
path: root/gnu/services.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2017-07-11 00:47:03 +0200
committerLudovic Courtès <ludo@gnu.org>2017-07-11 00:48:50 +0200
commit638e9deaf8926f02cb7ee861914b8eee5a3463a3 (patch)
tree53463fe4a78ee2ca76c4da7a6c987591f2d23b62 /gnu/services.scm
parent0ca3d5568676937d65674415d292820668fce6a7 (diff)
services: Make error message less scary.
* gnu/services.scm (service-back-edges): Show the type name of SERVICE instead of SERVICE in error message.
Diffstat (limited to 'gnu/services.scm')
-rw-r--r--gnu/services.scm5
1 files changed, 3 insertions, 2 deletions
diff --git a/gnu/services.scm b/gnu/services.scm
index 5c314748da..8ef1ae7c77 100644
--- a/gnu/services.scm
+++ b/gnu/services.scm
@@ -624,9 +624,10 @@ kernel."
(target-type target-type))
(&message
(message
- (format #f (G_ "no target of type '~a' for service ~s")
+ (format #f (G_ "no target of type '~a' for service '~a'")
(service-type-name target-type)
- service))))))
+ (service-type-name
+ (service-kind service))))))))
(x
(raise
(condition (&ambiguous-target-service-error