1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-02-02 20:16:25 +00:00

(find-file-noselect): When we expand a wildcard, return

a list of buffers, as we should do according to the doc string.
This commit is contained in:
Gerd Moellmann 2000-10-31 16:55:23 +00:00
parent 5b7bc0da05
commit 648ec2ff27

View File

@ -1007,7 +1007,7 @@ that are visiting the various files."
(find-file-wildcards nil))
(if (null files)
(find-file-noselect filename)
(car (mapcar #'find-file-noselect files))))
(mapcar #'find-file-noselect files)))
(let* ((buf (get-file-buffer filename))
(truename (abbreviate-file-name (file-truename filename)))
(number (nthcdr 10 (file-attributes truename)))