guix_mirror_bot pushed a commit to branch emacs-team
in repository guix.
commit 5014a18d748175c84552e74e5881ed53e82736f6
Author: Thanos Apollo <[email protected]>
AuthorDate: Sun May 31 11:33:35 2026 +0300
gnu: guix-emacs: Deduplicate non-core load path.
* gnu/packages/aux-files/emacs/guix-emacs.el
(guix-emacs--non-core-load-path): Deduplicate result.
Change-Id: I66b023db2f770df24a66eacdc5734914367ebdce
Signed-off-by: Liliana Marie Prikler <[email protected]>
---
gnu/packages/aux-files/emacs/guix-emacs.el | 11 ++++++-----
1 file changed, 6 insertions(+), 5 deletions(-)
diff --git a/gnu/packages/aux-files/emacs/guix-emacs.el
b/gnu/packages/aux-files/emacs/guix-emacs.el
index f8611d9eee..7bb189eac0 100644
--- a/gnu/packages/aux-files/emacs/guix-emacs.el
+++ b/gnu/packages/aux-files/emacs/guix-emacs.el
@@ -59,11 +59,12 @@ The files in the list do not have extensions (.el, .elc)."
"Load FILE, ignoring any errors."
(load file 'noerror (not guix-emacs-verbose)))
-(defsubst guix-emacs--non-core-load-path ()
- "Filter out core Elisp directories, which are already handled by Emacs."
- (seq-filter (lambda (dir)
- (string-match-p "/share/emacs/site-lisp" dir))
- load-path))
+(defun guix-emacs--non-core-load-path ()
+ "Return deduplicated non-core Elisp directories from `load-path'."
+ (delete-dups
+ (seq-filter (lambda (dir)
+ (string-match-p "/share/emacs/site-lisp" dir))
+ load-path)))
(defun guix-emacs--subdirs-files ()
"Return the Guix subdirs.el files found on the (non-core) load path."
