From 880f2734c95cec7ee6a9eec596e86543508415cd Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Wed, 13 Apr 2022 16:07:40 +0300 Subject: [PATCH] A better fix for bug#54800 * lisp/calc/calc.el (calc-align-stack-window): Improve scrolling when windows have non-integral dimensions. --- lisp/calc/calc.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el index 2f9afa02af8..171f7711324 100644 --- a/lisp/calc/calc.el +++ b/lisp/calc/calc.el @@ -1815,7 +1815,7 @@ See calc-keypad for details." (if win (progn (calc-cursor-stack-index 0) - (vertical-motion (- 3 (window-height win))) + (vertical-motion (- 3 (window-height win 'floor))) (set-window-start win (point))))) (calc-cursor-stack-index 0) (if (looking-at " *\\.$") -- 2.39.5