[Emacs-diffs] master c1b1801 1/2: Make atomic cell update in data area.

[Vincent Belaïche]

branch: master
commit c1b180153f57777b64e27c45633d8a05e02dda5a
Author: Vincent Belaïche <address@hidden>
Commit: Vincent Belaïche <address@hidden>

    Make atomic cell update in data area.
    
    * lisp/ses.el (ses-write-cells): Set inhibit-quit to t during the data
      area write.
---
 lisp/ses.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/lisp/ses.el b/lisp/ses.el
index 7fdacc7..37d0d61 100644
--- a/lisp/ses.el
+++ b/lisp/ses.el
@@ -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 " "))))