From 9a9f2ce036dc70fb1ebb1fd08d67cf8cc493f07e Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Fri, 22 Dec 2017 15:24:13 -0500 Subject: [PATCH] Fix make clean printing long, relative paths in output --- core/core-packages.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/core/core-packages.el b/core/core-packages.el index 06997cad4..2565a4bc5 100644 --- a/core/core-packages.el +++ b/core/core-packages.el @@ -680,13 +680,13 @@ If RECOMPILE-P is non-nil, only recompile out-of-date core files." (byte-recompile-directory package-user-dir 0 t)) (defun doom//clean-byte-compiled-files () - "Delete all the compiled elc files in your Emacs configuration. - -This excludes compiled packages in `doom-packages-dir'.'" + "Delete all the compiled elc files in your Emacs configuration. This excludes +compiled packages.'" (interactive) (let ((targets (append (list (expand-file-name "init.elc" doom-emacs-dir)) (directory-files-recursively doom-core-dir "\\.elc$") - (directory-files-recursively doom-modules-dir "\\.elc$")))) + (directory-files-recursively doom-modules-dir "\\.elc$"))) + (default-directory doom-emacs-dir)) (unless (cl-loop for path in targets if (file-exists-p path) collect path