diff options
author | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2012-09-30 22:59:29 +0200 |
---|---|---|
committer | Thierry Volpiatto <thierry.volpiatto@gmail.com> | 2012-09-30 22:59:29 +0200 |
commit | 15be0159db6dd7c010364c93f5976cb9de382b80 (patch) | |
tree | efcc89d973a0043a42379990a68b246d704cf8ad | |
parent | 7fdbbabf73a4b76977cb826a77d1809078f2a1ad (diff) |
* helm.el: remove uneeded test and use window-*sibling.
-rw-r--r-- | helm.el | 14 |
1 files changed, 4 insertions, 10 deletions
@@ -1472,20 +1472,14 @@ window or frame configuration is saved/restored according to values of (defun helm-split-window-default-fn (window) (let (split-width-threshold) (if (or (one-window-p) - helm-split-window-in-side-p - (and (or (eq helm-split-window-default-side 'left) - (eq helm-split-window-default-side 'right)) - (not helm-split-window-in-side-p))) + helm-split-window-in-side-p) (split-window (selected-window) nil helm-split-window-default-side) ;; If more than one window reuse it. (case helm-split-window-default-side - ((above left) (or (window-left (selected-window)) - (selected-window))) - ((below right) (or (window-right (selected-window)) - (selected-window))) - (t (or (window-right (selected-window)) - (selected-window))))))) + ((above left) (or (window-prev-sibling) (selected-window))) + ((below right) (or (window-next-sibling) (selected-window))) + (t (or (window-next-sibling) (selected-window))))))) ;; Core: Display *helm* buffer |