Commit b89c5b71 authored by Jay Belanger's avatar Jay Belanger
Browse files

(calc-digit-dots): Inhibit read-only before erasing minibuffer.

parent d7aea840
......@@ -183,7 +183,8 @@
(if calc-prev-prev-char
(calcDigit-nondigit)
(setq calc-digit-value nil)
(erase-buffer)
(let ((inhibit-read-only t))
(erase-buffer))
(exit-minibuffer)))
;; just ignore extra decimal point, anticipating ".."
(delete-backward-char 1)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment