From: Eli Zaretskii <eliz@gnu.org>
Date: Sat, 9 Apr 2022 13:30:23 +0000 (+0300)
Subject: Fix scrolling of the stack window in Calc
X-Git-Tag: emacs-28.1.90~149
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=84a285772201d077274dfc932524bbdf0d56848a;p=emacs.git

Fix scrolling of the stack window in Calc

* lisp/calc/calc.el (calc-align-stack-window): Fix off-by-one
error in computing the window-start point.  (Bug#54800)
---

diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el
index 81677d78e7a..2f9afa02af8 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 (- 2 (window-height win)))
+		(vertical-motion (- 3 (window-height win)))
 		(set-window-start win (point)))))
 	(calc-cursor-stack-index 0)
 	(if (looking-at " *\\.$")