A better fix for bug#54800

* lisp/calc/calc.el (calc-align-stack-window): Improve scrolling when windows have non-integral dimensions.
2022-04-13 16:07:40 +03:00
parent 5ee959aa87
commit 880f2734c9
1 changed files with 1 additions and 1 deletions
--- 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 " *\\.$")