Merge remote-tracking branch 'ryuslash/master'HEADmaster

Conflicts:
	bw.el

1 files changed, 10 insertions, 0 deletions

diff --git a/bw.el b/bw.el
index 453c1ab..7e94a28 100644
--- a/bw.el
+++ b/bw.el
@@ -90,6 +90,16 @@
     (setq bw-last-shown-buffer buffer)
     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))
 
 (defun bw-find-appropriate-buffer ()