bug#25946: 26.0.50; display-buffer ignores ignores reusable-frames in display-buffer-alist

[martin rudalics <rudalics@gmx.at>]

[-- Attachment #1: Type: text/plain, Size: 402 bytes --]

Can some kind soul please apply the attached patch to master?  The
commit message is


In `window--display-buffer' fix behavior reported in Bug#25946

* lisp/window.el (window--display-buffer): Set the dedicated
status of the window used and clear its history of previous
buffers also for the case that the window already shows the
buffer to be displayed.  (Bug#25946)


Many thanks in advance, martin

[-- Attachment #2: window.el.diff --]
[-- Type: text/plain, Size: 856 bytes --]

diff --git a/lisp/window.el b/lisp/window.el
index 358d7bc..5050243 100644
--- a/lisp/window.el
+++ b/lisp/window.el
@@ -6643,11 +6643,11 @@ window--display-buffer
     (display-buffer-record-window type window buffer)
     (unless (eq buffer (window-buffer window))
       (set-window-dedicated-p window nil)
-      (set-window-buffer window buffer)
-      (when dedicated
-	(set-window-dedicated-p window dedicated))
-      (when (memq type '(window frame))
-	(set-window-prev-buffers window nil)))
+      (set-window-buffer window buffer))
+    (when dedicated
+      (set-window-dedicated-p window dedicated))
+    (when (memq type '(window frame))
+      (set-window-prev-buffers window nil))
     (let ((quit-restore (window-parameter window 'quit-restore))
 	  (height (cdr (assq 'window-height alist)))
 	  (width (cdr (assq 'window-width alist)))