aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--guix/ui.scm3
1 files changed, 3 insertions, 0 deletions
diff --git a/guix/ui.scm b/guix/ui.scm
index 03196dbeaf..6247944068 100644
--- 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