diff options
| author | Gerd Moellmann | 2000-10-31 16:55:23 +0000 |
|---|---|---|
| committer | Gerd Moellmann | 2000-10-31 16:55:23 +0000 |
| commit | 648ec2ff27b23d245acd7fb766bc33c58b8b27fa (patch) | |
| tree | e5cabd0dfe188867ece631e854fa0cc95ef251c8 | |
| parent | 5b7bc0da05e3cfb118d0e2d8004e6f6b17872573 (diff) | |
| download | emacs-648ec2ff27b23d245acd7fb766bc33c58b8b27fa.tar.gz emacs-648ec2ff27b23d245acd7fb766bc33c58b8b27fa.zip | |
(find-file-noselect): When we expand a wildcard, return
a list of buffers, as we should do according to the doc string.
| -rw-r--r-- | lisp/files.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/files.el b/lisp/files.el index 268565968aa..3fa55ac80ad 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -1007,7 +1007,7 @@ that are visiting the various files." | |||
| 1007 | (find-file-wildcards nil)) | 1007 | (find-file-wildcards nil)) |
| 1008 | (if (null files) | 1008 | (if (null files) |
| 1009 | (find-file-noselect filename) | 1009 | (find-file-noselect filename) |
| 1010 | (car (mapcar #'find-file-noselect files)))) | 1010 | (mapcar #'find-file-noselect files))) |
| 1011 | (let* ((buf (get-file-buffer filename)) | 1011 | (let* ((buf (get-file-buffer filename)) |
| 1012 | (truename (abbreviate-file-name (file-truename filename))) | 1012 | (truename (abbreviate-file-name (file-truename filename))) |
| 1013 | (number (nthcdr 10 (file-attributes truename))) | 1013 | (number (nthcdr 10 (file-attributes truename))) |