From: Ashwin Kafle <ashwin@ashwink.com.np>
Date: Thu, 13 Jun 2024 10:21:38 +0000 (+0545)
Subject: Fix calc-trail-here for first line of trail.
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9d1e9484bc7879119ca84c181c99eecdf2ccdd14;p=emacs.git

Fix calc-trail-here for first line of trail.

* lisp/calc/calc.el(calc-trail-here): Change 'or' to 'and'
since (bobp) can return true even if the buffer is not empty.
(Bug#71533)

(cherry picked from commit c637adbf32f2566b739eb96e68546201c55540af)
---

diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el
index e6448625cee..f92e4958e33 100644
--- a/lisp/calc/calc.el
+++ b/lisp/calc/calc.el
@@ -2184,7 +2184,7 @@ the United States."
 	(beginning-of-line)
 	(if (eobp)
             (forward-line -1))
-	(if (or (bobp) (eobp))
+	(if (and (bobp) (eobp))
 	    (setq overlay-arrow-position nil)   ; trail is empty
 	  (set-marker calc-trail-pointer (point) (current-buffer))
 	  (setq calc-trail-overlay (concat (buffer-substring (point)