summaryrefslogtreecommitdiff
path: root/lisp/ibuffer.el
diff options
context:
space:
mode:
authorMartin Rudalics <rudalics@gmx.at>2016-12-05 11:06:55 +0100
committerMartin Rudalics <rudalics@gmx.at>2016-12-05 11:06:55 +0100
commitd75e9881fdf648fcb6c25e344353450a7806feee (patch)
tree31deecc9a2b859bc3706960480430273efcfa018 /lisp/ibuffer.el
parent65b729bfb4124a900d9e2e18bc68fdc0168e805b (diff)
downloademacs-d75e9881fdf648fcb6c25e344353450a7806feee.tar.gz
Don't try to split side windows in ibuffer (Bug#25115)
* lisp/ibuffer.el (ibuffer-confirm-operation-on): Don't try to split a side window (Bug#25115).
Diffstat (limited to 'lisp/ibuffer.el')
-rw-r--r--lisp/ibuffer.el6
1 files changed, 5 insertions, 1 deletions
diff --git a/lisp/ibuffer.el b/lisp/ibuffer.el
index 51d7cb90755..16fbf5799ff 100644
--- a/lisp/ibuffer.el
+++ b/lisp/ibuffer.el
@@ -1197,7 +1197,11 @@ a new window in the current frame, splitting vertically."
(ibuffer-columnize-and-insert-list names)
(goto-char (point-min))
(setq buffer-read-only t))
- (let ((lastwin (car (last (window-list nil 'nomini)))))
+ (let ((windows (nreverse (window-list nil 'nomini)))
+ lastwin)
+ (while (window-parameter (car windows) 'window-side)
+ (setq windows (cdr windows)))
+ (setq lastwin (car windows))
;; Now attempt to display the buffer...
(save-window-excursion
(select-window lastwin)