diff options
| author | Ludovic Courtès <ludo@gnu.org> | 2017-07-11 00:47:03 +0200 |
|---|---|---|
| committer | Ludovic Courtès <ludo@gnu.org> | 2017-07-11 00:48:50 +0200 |
| commit | 638e9deaf8926f02cb7ee861914b8eee5a3463a3 (patch) | |
| tree | 53463fe4a78ee2ca76c4da7a6c987591f2d23b62 /gnu | |
| parent | 0ca3d5568676937d65674415d292820668fce6a7 (diff) | |
| download | patches-638e9deaf8926f02cb7ee861914b8eee5a3463a3.tar patches-638e9deaf8926f02cb7ee861914b8eee5a3463a3.tar.gz | |
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')
| -rw-r--r-- | gnu/services.scm | 5 |
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 |