~ruther/guix-local: services: Make error message less scary.

638e9deaf8926f02cb7ee861914b8eee5a3463a3 — Ludovic Courtès 8 years ago 0ca3d55

services: Make error message less scary.

* gnu/services.scm (service-back-edges): Show the type name of SERVICE
instead of SERVICE in error message.

patch browse .tar.gz

1 files changed, 3 insertions(+), 2 deletions(-)

M gnu/services.scm

M gnu/services.scm => gnu/services.scm +3 -2

@@ 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