[Emacs-diffs] trunk r115525: Have display-buffer-below-selected never split window horizontally.

[Martin Rudalics]

------------------------------------------------------------
revno: 115525
revision-id: address@hidden
parent: address@hidden
committer: martin rudalics <address@hidden>
branch nick: trunk
timestamp: Sat 2013-12-14 18:00:54 +0100
message:
  Have display-buffer-below-selected never split window horizontally.
  
  * window.el (display-buffer-below-selected): Never split window
  horizontally.  Suggested by Juri Linkov <address@hidden>.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/window.el                 window.el-20091113204419-o5vbwnq5f7feedwu-94

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-12-14 16:02:39 +0000
+++ b/lisp/ChangeLog    2013-12-14 17:00:54 +0000
@@ -1,3 +1,8 @@
+2013-12-14  Martin Rudalics  <address@hidden>
+
+       * window.el (display-buffer-below-selected): Never split window
+       horizontally.  Suggested by Juri Linkov <address@hidden>.
+
 2013-12-14  Tom Willemse  <address@hidden>  (tiny change)
 
        * emacs-lisp/package.el (package--prepare-dependencies): New function.

=== modified file 'lisp/window.el'
--- a/lisp/window.el    2013-12-13 17:06:30 +0000
+++ b/lisp/window.el    2013-12-14 17:00:54 +0000
@@ -6245,7 +6245,8 @@
 the selected one."
   (let (window)
     (or (and (not (frame-parameter nil 'unsplittable))
-            (setq window (window--try-to-split-window (selected-window) alist))
+            (let (split-width-threshold)
+              (setq window (window--try-to-split-window (selected-window) 
alist)))
             (window--display-buffer
              buffer window 'window alist display-buffer-mark-dedicated))
        (and (setq window (window-in-direction 'below))