[Emacs-diffs] master 44ad4a1: Fix Bug#32454

[Michael Albinus]

branch: master
commit 44ad4a15a0099285a16018ad790419cb60df5815
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>

    Fix Bug#32454
    
    * lisp/files.el (find-alternate-file): Handle the wildcards case.
    (Bug#32454)
---
 lisp/files.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/files.el b/lisp/files.el
index 8057def..da4f2cd 100644
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -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.