awesome-emacs/doomemacs
1
0
Fork 0
mirror of https://github.com/doomemacs/doomemacs synced 2025-08-01 12:17:25 -05:00
Code Issues Packages Projects Releases Wiki Activity

Be extra sure to delete the right *.elc files

Browse Source 
Ensures no extra elc files are caught in the crossfire, e.g. in .cask or
elsewhere.
This commit is contained in:
Henrik Lissner
2017-06-02 22:29:07 +02:00
parent 45627d6ea6
commit d5682953a9
1 changed files with 10 additions and 5 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
core/core-packages.el
View File

@ -536,11 +536,16 @@ components to feel its effects."
"Delete all compiled elc files in DOOM emacs, excluding compiled ELPA/QUELPA "Delete all compiled elc files in DOOM emacs, excluding compiled ELPA/QUELPA
package files." package files."
(interactive) (interactive)
(when-let (elc-files (cl-remove-if (lambda (file) (file-in-directory-p file doom-local-dir)) (if-let (elc-files
(directory-files-recursively doom-emacs-dir "\\.elc$"))) (append
(dolist (file elc-files) (let ((init-elc (expand-file-name "init.elc" doom-emacs-dir)))
(delete-file file) (if (file-exists-p init-elc) (list init-elc)))
(message "Deleting %s" (file-relative-name file doom-emacs-dir))))) (directory-files-recursively doom-core-dir "\\.elc$")
(directory-files-recursively doom-modules-dir "\\.elc$")))
(dolist (file elc-files)
(delete-file file)
(message "Deleting %s" (file-relative-name file doom-emacs-dir)))
(message "Everything is clean")))
;; ;;