1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-27 08:43:40 -07:00

Make atomic cell update in data area.

* lisp/ses.el (ses-write-cells): Set inhibit-quit to t during the data
  area write.
This commit is contained in:
Vincent Belaïche 2019-07-28 16:45:22 +02:00
parent ba952d654a
commit c1b180153f

View file

@ -1509,8 +1509,9 @@ Newlines in the data are escaped."
,printer
,(ses-cell-references cell))))
(ses-goto-data row col)
(delete-region (point) (line-end-position))
(insert text)))
(let ((inhibit-quit t))
(delete-region (point) (line-end-position))
(insert text))))
(message " "))))