diff options
| author | Mattias Engdegård <mattiase@acm.org> | 2020-07-22 11:27:15 +0200 |
|---|---|---|
| committer | Mattias Engdegård <mattiase@acm.org> | 2020-07-22 11:27:15 +0200 |
| commit | 687a9d3e2fca5f207ec3bd6acf744d0c0cd96962 (patch) | |
| tree | 95d17cd8aeabc73242ae7a9ea96c53b2bc84eac9 /lisp/calc | |
| parent | 33d85cb768b40794bffcd9ab22fbdec1211a74e5 (diff) | |
| download | emacs-687a9d3e2fca5f207ec3bd6acf744d0c0cd96962.tar.gz emacs-687a9d3e2fca5f207ec3bd6acf744d0c0cd96962.tar.bz2 emacs-687a9d3e2fca5f207ec3bd6acf744d0c0cd96962.zip | |
Calc: fix interval entry snag (bug#42438)
* lisp/calc/calc.el (calcDigit-key): Don't signal a 'Bad format' error
when entering '..' after pushing an incomplete interval.
Reported by Allen Li.
Diffstat (limited to 'lisp/calc')
| -rw-r--r-- | lisp/calc/calc.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el index 4e4fb671730..09b49621070 100644 --- a/lisp/calc/calc.el +++ b/lisp/calc/calc.el @@ -2429,7 +2429,7 @@ the United States." (if (and (memq last-command-event '(?@ ?o ?h ?\' ?m)) (string-match " " calc-hms-format)) (insert " ")) - (if (and (eq this-command last-command) + (if (and (memq last-command '(calcDigit-start calcDigit-key)) (eq last-command-event ?.)) (progn (require 'calc-ext) |