Fix Bug#32454
* lisp/files.el (find-alternate-file): Handle the wildcards case. (Bug#32454)
This commit is contained in:
parent
5f39f203ee
commit
44ad4a15a0
1 changed files with 1 additions and 1 deletions
|
@ -1831,7 +1831,7 @@ killed."
|
|||
;; in some corner cases, e.g. when the selected window is
|
||||
;; softly-dedicated.
|
||||
(let ((newbuf (find-file-noselect filename nil nil wildcards)))
|
||||
(switch-to-buffer newbuf)))
|
||||
(switch-to-buffer (if (consp newbuf) (car newbuf) newbuf))))
|
||||
(when (eq obuf (current-buffer))
|
||||
;; This executes if find-file gets an error
|
||||
;; and does not really find anything.
|
||||
|
|
Loading…
Add table
Reference in a new issue