mirror of
https://github.com/doomemacs/doomemacs
synced 2025-08-11 13:07:28 -05:00
Fix duplicates in doom module pairs/paths
This commit is contained in:
@ -220,10 +220,10 @@ files."
|
|||||||
(defun doom--module-pairs ()
|
(defun doom--module-pairs ()
|
||||||
"Returns `doom-modules' as a list of (MODULE . SUBMODULE) cons cells. The list
|
"Returns `doom-modules' as a list of (MODULE . SUBMODULE) cons cells. The list
|
||||||
is sorted by order of insertion."
|
is sorted by order of insertion."
|
||||||
(let ((pairs '(nil)))
|
(let (pairs)
|
||||||
(maphash (lambda (key value) (nconc pairs (list (cons (car key) (cdr key)))))
|
(maphash (lambda (key value) (push (cons (car key) (cdr key)) pairs))
|
||||||
doom-modules)
|
doom-modules)
|
||||||
(cdr pairs)))
|
(reverse pairs)))
|
||||||
|
|
||||||
(defun doom--module-paths (&optional append-file)
|
(defun doom--module-paths (&optional append-file)
|
||||||
"Returns a list of absolute file paths to modules, with APPEND-FILE added, if
|
"Returns a list of absolute file paths to modules, with APPEND-FILE added, if
|
||||||
|
Reference in New Issue
Block a user