Don't assume order of `get-buffer-window-list' results

It only guarantees that the first result *if* the buffer appears on the selected window.
2018-08-16 12:00:00 +00:00 · 2018-08-16 12:00:00 +00:00 · 633065ad55
commit 633065ad55
parent 11fecb5186
1 changed files with 4 additions and 2 deletions
--- a/exwm-layout.el
+++ b/exwm-layout.el
@ -306,8 +306,10 @@ selected by `other-buffer'."
                ;; windows displaying an EXWM-buffer now displayed elsewhere; we
                ;; need to display with some other buffer there.
                (setq vacated-windows
-                      (append vacated-windows (cdr (get-buffer-window-list
-                                                    (current-buffer) 'nomini t))))
+                      (append vacated-windows (remove
+                                               window
+                                               (get-buffer-window-list
+                                                (current-buffer) 'nomini t))))
                ;; Note down when an EXWM-buffer is being covered by this
                ;; buffer; we don't want it to reappear in some vacated window.
                (let ((prev-buffer (car-safe