From 4d67b50a9239f4193472c8b7a581ddc8e1ac9eb1 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Przemys=C5=82aw=20Kryger?= Date: Sun, 29 Dec 2024 12:04:49 +0000 Subject: [PATCH] [prot] Window splitting direction - use preferred function for helm --- modules/init-helm.el | 19 +++++++++---------- 1 file changed, 9 insertions(+), 10 deletions(-) diff --git a/modules/init-helm.el b/modules/init-helm.el index 43005413..26a10c4c 100644 --- a/modules/init-helm.el +++ b/modules/init-helm.el @@ -35,20 +35,16 @@ :custom (helm-split-window-default-side 'other) - (helm-split-width-threshold - (when (eq exordium-split-window-preffered-direction 'longest) - split-width-threshold)) - - (helm-split-window-state - (if (eq exordium-split-window-preffered-direction 'horizontal) - 'horizontal - 'vertical)) - (helm-split-window-other-side-when-one-window (if (eq exordium-split-window-preffered-direction 'horizontal) 'right 'below)) + (helm-split-window-preferred-function + (if (eq exordium-split-window-preffered-direction 'longest) + #'split-window-sensibly + #'helm-split-window-default-fn)) + (helm-buffer-details-flag nil) (helm-completion-style (cond ((and exordium-helm-fuzzy-match @@ -210,7 +206,10 @@ helm-swoop--edit-cancel helm-swoop--edit-delete-all-lines) :custom - (helm-swoop-split-direction 'split-window-sensibly) + (helm-swoop-split-direction (pcase exordium-split-window-preffered-direction + ('longest #'split-window-sensibly) + ('horizontal #'split-window-horizontally) + (_ #'split-window-vertically))) :bind (("C-S-s" . #'helm-swoop) ;; Use similar bindings to `helm-ag-edit'