summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--gnu/packages.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/gnu/packages.scm b/gnu/packages.scm
index db6a6c21ae3..8d40e3e3352 100644
--- a/gnu/packages.scm
+++ b/gnu/packages.scm
@@ -177,7 +177,8 @@ flags."
177 (map (lambda (directory) 177 (map (lambda (directory)
178 (if (string=? directory %distro-root-directory) 178 (if (string=? directory %distro-root-directory)
179 (string-append directory "/gnu/packages/patches") 179 (string-append directory "/gnu/packages/patches")
180 directory)) 180 (or (false-if-exception (canonicalize-path directory))
181 directory)))
181 (map strip-trailing-slash %load-path)))) 182 (map strip-trailing-slash %load-path))))
182 183
183;; This procedure is used by Emacs-Guix up to 0.5.1.1, so keep it for now. 184;; This procedure is used by Emacs-Guix up to 0.5.1.1, so keep it for now.