Make reading project--list safer

* lisp/progmodes/project.el (project--read-project-list):
Ensure that each directory has a trailing '/' (bug#75983).
This commit is contained in:
Ship Mints 2025-02-12 18:02:28 +02:00 committed by Dmitry Gutov
parent 8eef890739
commit 2bb38cc46d

View file

@ -1824,7 +1824,8 @@ With some possible metadata (to be decided).")
(lambda (elem)
(let ((name (car elem)))
(list (if (file-remote-p name) name
(abbreviate-file-name name)))))
(file-name-as-directory
(abbreviate-file-name name))))))
(condition-case nil
(read (current-buffer))
(end-of-file