emenel/doomemacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Add :mindepth property to doom-files-in

Browse source 
+ don't error out if directory doesn't exist.
+ :depth now starts from 0, instead of 1
This commit is contained in:
Henrik Lissner 2018-06-12 16:01:11 +02:00
parent acbad5ca01
commit 399591b951
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
2 changed files with 36 additions and 30 deletions
Download patch file Download diff file Expand all files Collapse all files

6
core/core-dispatcher.el
View file

@ -673,10 +673,10 @@ If RECOMPILE-P is non-nil, only recompile out-of-date files."
module. This does not include your byte-compiled, third party packages.'"
(interactive)
(cl-loop with default-directory = doom-emacs-dir
for path in (append (doom-files-in doom-emacs-dir :match "\\.elc$" :depth 1)
(doom-files-in doom-private-dir :match "\\.elc$" :depth 2)
for path in (append (doom-files-in doom-emacs-dir :match "\\.elc$" :depth 0)
(doom-files-in doom-private-dir :match "\\.elc$" :depth 1)
(doom-files-in doom-core-dir :match "\\.elc$")
(doom-files-in doom-modules-dirs :match "\\.elc$" :depth 4))
(doom-files-in doom-modules-dirs :match "\\.elc$" :depth 3))
for truepath = (file-truename path)
if (file-exists-p path)
do (delete-file path)