ryuslash/bw
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Merge remote-tracking branch 'ryuslash/master'

Browse source 
Conflicts:
	bw.el
This commit is contained in:
Tom Willemsen 2012-09-20 20:35:58 +02:00
commit 296ccbd5e6
1 changed files with 10 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

10
bw.el
View file

@ -90,6 +90,16 @@
(setq bw-last-shown-buffer buffer) (setq bw-last-shown-buffer buffer)
win)) win))
;;;###autoload
(defun bw-display-in-other-window (buffer alist)
"Show BUFFER in any window that is not the bottom window.
Discard ALIST."
(let ((win (get-buffer-window buffer)))
(when (window-parameter win 'bw-bottom)
(setq win (next-window win 'no)))
(set-window-buffer win buffer)))
(add-to-list 'window-persistent-parameters (cons 'bw-bottom t)) (add-to-list 'window-persistent-parameters (cons 'bw-bottom t))
(defun bw-find-appropriate-buffer () (defun bw-find-appropriate-buffer ()