diff --git a/modules/init-helm.el b/modules/init-helm.el index 768d3b80..43005413 100644 --- a/modules/init-helm.el +++ b/modules/init-helm.el @@ -36,19 +36,16 @@ (helm-split-window-default-side 'other) (helm-split-width-threshold - (when (eq exordium-split-window-preffered-direction - 'longest) + (when (eq exordium-split-window-preffered-direction 'longest) split-width-threshold)) (helm-split-window-state - (if (memq exordium-split-window-preffered-direction - '(horizontal longest-horizontal)) + (if (eq exordium-split-window-preffered-direction 'horizontal) 'horizontal 'vertical)) (helm-split-window-other-side-when-one-window - (if (memq exordium-split-window-preffered-direction - '(horizontal longest-horizontal)) + (if (eq exordium-split-window-preffered-direction 'horizontal) 'right 'below)) diff --git a/modules/init-prefs.el b/modules/init-prefs.el index c80916cb..84ca2f46 100644 --- a/modules/init-prefs.el +++ b/modules/init-prefs.el @@ -58,10 +58,6 @@ on the frame shape: in landscape orientation it will be like `horizontal', but in portrait it will be like `vertical'. Basically, the longest of the two dimension is split first. -When set `longest-vertical' or `longest-horizontal' then Helm -will use vertical/below or horizontal/right respectively for -window splitting. - If both `split-width-threshold' and `split-height-threshold' cannot be satisfied, it will fallback to split vertically." :group 'exordium @@ -71,11 +67,7 @@ cannot be satisfied, it will fallback to split vertically." (const :tag "Try to split horizontally first" horizontal) (const :tag "Try to split along the longest edge" - longest) - (const :tag "Try to split along the longest edge or vertically in Helm" - longest-vertical) - (const :tag "Try to split along the longest edge or horizontally in Helm" - longest-horizontal))) + longest))) (defcustom exordium-line-mode t "Whether the current line is highlighted or not." diff --git a/modules/init-window-manager.el b/modules/init-window-manager.el index ffdeae11..b7778a8d 100644 --- a/modules/init-window-manager.el +++ b/modules/init-window-manager.el @@ -34,11 +34,7 @@ (use-package window :ensure nil :custom - (split-window-preferred-direction - (if (memq exordium-split-window-preffered-direction - '(longest longest-vertical longest-horizontal)) - 'longest - exordium-split-window-preffered-direction)) + (split-window-preferred-direction exordium-split-window-preffered-direction) :functions (exordium--window-try-vertical-split exordium--window-try-horizontal-split exordium-split-window-sensibly) @@ -61,8 +57,7 @@ (let ((window (or window (selected-window)))) (or (if (or (eq exordium-split-window-preffered-direction 'horizontal) - (and (memq exordium-split-window-preffered-direction - '(longest longest-horizontal longest-vertical)) + (and (eq exordium-split-window-preffered-direction 'longest) (> (frame-width) (frame-height)))) (or (exordium--window-try-horizontal-split window) (exordium--window-try-vertical-split window))