From 44ad4a15a0099285a16018ad790419cb60df5815 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Thu, 16 Aug 2018 17:26:37 +0200 Subject: [PATCH] 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 8057def5259..da4f2cd78fe 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. -- 2.39.2