summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThierry Volpiatto <thierry.volpiatto@gmail.com>2012-09-30 22:59:29 +0200
committerThierry Volpiatto <thierry.volpiatto@gmail.com>2012-09-30 22:59:29 +0200
commit15be0159db6dd7c010364c93f5976cb9de382b80 (patch)
treeefcc89d973a0043a42379990a68b246d704cf8ad
parent7fdbbabf73a4b76977cb826a77d1809078f2a1ad (diff)
* helm.el: remove uneeded test and use window-*sibling.
-rw-r--r--helm.el14
1 files changed, 4 insertions, 10 deletions
diff --git a/helm.el b/helm.el
index 59983298..9b460896 100644
--- a/helm.el
+++ b/helm.el
@@ -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