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)

diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el
index e6448625ceee3e2ef8543c244fafadc353484a2d..f92e4958e33a1d001b39bf68196b633e6521f2e9 100644 (file)
--- 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)