fix(lib): incorrect &user markers in doom-info

M-x doom/info marks modules that live in $DOOMDIR with &user, but what
if the user has moved their ~/.emacs.d into $DOOMDIR? As this seems to
happen often with Chemacs users, I've made this check a little more
procise.
This commit is contained in:
Henrik Lissner 2022-02-09 22:23:39 +01:00
parent 00b7e390d3
commit 39886536c3

View file

@ -182,13 +182,15 @@ ready to be pasted in a bug report on github."
collect collect
(let* ((flags (doom-module-get cat (cdr key) :flags)) (let* ((flags (doom-module-get cat (cdr key) :flags))
(path (doom-module-get cat (cdr key) :path)) (path (doom-module-get cat (cdr key) :path))
(module (append (cond ((null path) (module
(list '&nopath)) (append
((file-in-directory-p path doom-private-dir) (cond ((null path)
(list '&user))) (list '&nopath))
(if flags ((not (file-in-directory-p path doom-modules-dir))
`(,(cdr key) ,@flags) (list '&user)))
(list (cdr key)))))) (if flags
`(,(cdr key) ,@flags)
(list (cdr key))))))
(if (= (length module) 1) (if (= (length module) 1)
(car module) (car module)
module))) module)))