ui: Wrap 'canonicalize-path' for better error reporting.

Reported by Christopher Baines. * guix/ui.scm (canonicalize-path): New procedure.
2017-01-13 12:09:01 +01:00 · 2017-01-13 12:09:01 +01:00 · 6d30b1b2ca
parent e7ff05438f
commit 6d30b1b2ca
1 changed files with 3 additions and 0 deletions
--- a/guix/ui.scm
+++ b/guix/ui.scm
@ -362,6 +362,9 @@ FILE."
  ;; 'copy-recursively', which doesn't use (guix ui).
  (error-reporting-wrapper copy-file (source target) target))

+(set! canonicalize-path
+  (error-reporting-wrapper canonicalize-path (file) file))
+

 (define (make-regexp* regexp . flags)
  "Like 'make-regexp' but error out if REGEXP is invalid, reporting the error