Calc: fix interval entry (bug#39040)

* lisp/calc/calc.el (calcDigit-start): Initialise calc-prev-char to
something more reasonable, so that non-algebraic entry of intervals
whose start is a single digit, like (1..10), works properly.
Reported by Michel Schinz.

diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el
index d299c5bf5d367afe1558b384b8044a37d7d00d35..b519559330eb09ac8710b460a9f65762d1a9679d 100644 (file)
--- a/lisp/calc/calc.el
+++ b/lisp/calc/calc.el
@@ -2288,7 +2288,7 @@ the United States."
        (calc-alg-digit-entry)
      (setq calc-aborted-prefix nil)
      (let* ((calc-digit-value nil)
-           (calc-prev-char nil)
+           (calc-prev-char last-command-event)
            (calc-prev-prev-char nil)
            (calc-buffer (current-buffer))
            (buf