branch: elpa/helm commit 7940e96edaff5682b99df5f3b88b0f4860bbc0cb Author: flintforge <flint@forge.systems> Commit: flintforge <flint@forge.systems>
PR #2707 helm-core.el: frame width and positioning fix `helm-display-buffer-width' and it's positioning in `helm-display-buffer-in-own-frame' --- helm-core.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/helm-core.el b/helm-core.el index cd6c70fac1..5b1046c47e 100644 --- a/helm-core.el +++ b/helm-core.el @@ -3558,7 +3558,7 @@ version < emacs-28." (half-screen-size (/ (display-pixel-height x-display-name) 2)) (frame-info (frame-geometry)) (screen-width (display-pixel-width x-display-name)) - (helm-frame-width (* (frame-char-width) helm-display-buffer-width)) + (helm-frame-width (* (frame-char-width) (+ 2 helm-display-buffer-width))) (prmt-size (length helm--prompt)) (prmt-width (* prmt-size (frame-char-width))) (line-height (frame-char-height)) @@ -3572,10 +3572,10 @@ version < emacs-28." (tool-bar-lines . 0) ;; lateral constraint to keep the frame inside of the screen (left . , - (if (> (+ px helm-frame-width) screen-width) + (if (> (+ px helm-frame-width) + screen-width) (- screen-width - helm-frame-width - prmt-width) + helm-frame-width ) (if (< (- px prmt-width) 0) 0 (- px prmt-width))))