changeset 59614:b883f279ae24

(calc-edit-mode): Inhibit read-only when erasing buffer.
author Jay Belanger <jay.p.belanger@gmail.com>
date Tue, 18 Jan 2005 04:52:55 +0000
parents 1c3d052ef4bf
children c0ae409ee985
files lisp/calc/calc-yank.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calc/calc-yank.el	Tue Jan 18 01:01:29 2005 +0000
+++ b/lisp/calc/calc-yank.el	Tue Jan 18 04:52:55 2005 +0000
@@ -460,7 +460,8 @@
     (setq calc-restore-trail (get-buffer-window (calc-trail-buffer)))
     (make-local-variable 'calc-allow-ret)
     (setq calc-allow-ret allow-ret)
-    (erase-buffer)
+    (let ((inhibit-read-only t))
+      (erase-buffer))
     (add-hook 'kill-buffer-hook (lambda () 
                                   (let ((calc-edit-handler nil))
                                     (calc-edit-finish t))