Mercurial > emacs
changeset 57691:8dc3dd828d67
(calc-digit-dots): Inhibit read-only before erasing minibuffer.
| author | Jay Belanger <jay.p.belanger@gmail.com> |
|---|---|
| date | Mon, 25 Oct 2004 13:57:20 +0000 |
| parents | 1624e4e8ab2a |
| children | cb7894e06217 |
| files | lisp/calc/calc-incom.el |
| diffstat | 1 files changed, 2 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calc/calc-incom.el Mon Oct 25 13:22:17 2004 +0000 +++ b/lisp/calc/calc-incom.el Mon Oct 25 13:57:20 2004 +0000 @@ -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)))