emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/helm 138afd24ae 2/4: Fix initial setting of helm-split-win


From: ELPA Syncer
Subject: [nongnu] elpa/helm 138afd24ae 2/4: Fix initial setting of helm-split-window-state (#2635)
Date: Wed, 17 Jan 2024 07:00:15 -0500 (EST)

branch: elpa/helm
commit 138afd24aea65344779be2b038645b30cd50c190
Author: Thierry Volpiatto <thievol@posteo.net>
Commit: Thierry Volpiatto <thievol@posteo.net>

    Fix initial setting of helm-split-window-state (#2635)
    
    We were previously checking split-witdth-threshold which is now let-bounded 
to
    helm-split-width-threshold (was not existing at the time), check
    instead helm-split-width-threshold.
    In addition a check of helm-split-window-default-side is done which
    IMO make sense as well.
---
 helm-core.el | 10 +++++++---
 1 file changed, 7 insertions(+), 3 deletions(-)

diff --git a/helm-core.el b/helm-core.el
index 2349111f13..f97ddb31d3 100644
--- a/helm-core.el
+++ b/helm-core.el
@@ -3716,10 +3716,14 @@ Argument SAVE-OR-RESTORE is either save or restore."
   (unless (and (or helm-split-window-state
                    helm--window-side-state)
                helm-reuse-last-window-split-state)
+    ;; `helm-split-window-state' should be the contrary of what we currently
+    ;; have to allow toggling windows with C-t.
     (setq helm-split-window-state
-          (if (or (null split-width-threshold)
-                  (and (integerp split-width-threshold)
-                       (>= split-width-threshold (+ (frame-width) 4))))
+          (if (or (null helm-split-window-default-side) ; same as below.
+                  (memq helm-split-window-default-side '(below above))
+                  (null helm-split-width-threshold)
+                  (and (integerp helm-split-width-threshold)
+                       (>= helm-split-width-threshold (+ (frame-width) 4))))
               'vertical 'horizontal))
     (setq helm--window-side-state
           (or helm-split-window-default-side 'below)))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]