[elpa] externals/buffer-expose 837f72d 1/3: Dont preselect other buffer when killing buffer

[Clemens Radermacher]

branch: externals/buffer-expose
commit 837f72d2def6b4fa3235c95447b1d583d36fb511
Author: Clemens Radermacher <address@hidden>
Commit: Clemens Radermacher <address@hidden>

    Dont preselect other buffer when killing buffer
---
 buffer-expose.el | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/buffer-expose.el b/buffer-expose.el
index 516239f..edab044 100644
--- a/buffer-expose.el
+++ b/buffer-expose.el
@@ -1027,14 +1027,14 @@ F defaults to the currently selected window."
   "Kill currently selected buffer."
   (interactive)
   (let ((buf (window-buffer))
-        (w (get-buffer-window))
-        (nw (buffer-expose--other-window)))
-    (buffer-expose--select-window nw)
+        (w (get-buffer-window)))
     (let ((overriding-terminal-local-map nil))
-      (if (kill-buffer buf)
-          (setf (window-buffer w)
-                (buffer-expose--create-empty-buffer))
-        (buffer-expose--select-window w)))))
+      (when (kill-buffer buf)
+        (setq buffer-expose--selected-cookie nil)
+        (setf (window-buffer w)
+              (buffer-expose--create-empty-buffer))
+        (buffer-expose--other-window)
+        (buffer-expose--update-display)))))
 
 (defun buffer-expose-choose ()
   "Choose buffer and exit overview."