Fix 'prepare-user-lisp' to follow symlinks

* lisp/startup.el (prepare-user-lisp): Call
'directory-files-recursively' with a non-nil value for
FOLLOW-SYMLINKS.  This was the intended way for the function to
operate, during the planning phase, so that users could
structure their User Lisp directory by linking in Lisp
directories from other parts of their file system.
This commit is contained in:
Philip Kaludercic 2026-05-11 15:34:24 +02:00
parent e613e38021
commit 9e4ea934f2
No known key found for this signature in database

View file

@ -1265,7 +1265,7 @@ unconditionally."
(backup-inhibited t)
(dirs (list dir)))
(add-to-list 'load-path (directory-file-name dir))
(dolist (file (directory-files-recursively dir "" t pred))
(dolist (file (directory-files-recursively dir "" t pred t))
(cond
((and (file-regular-p file) (string-suffix-p ".el" file))
(unless just-activate