diff options
| author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2019-01-21 21:45:50 +0100 |
|---|---|---|
| committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2019-01-21 21:45:50 +0100 |
| commit | a23a4832454f3e7a1cbd79f5842969007ed4c0ae (patch) | |
| tree | a22410b4733ab44332a5bcf81fe182a27bcb3948 | |
| parent | bcdb2b55681bdd96ef245e6a53f866908a12674a (diff) | |
| parent | 5a63156b0165304104dcdc4b16437ec08e81f6d6 (diff) | |
| download | org-mode-a23a4832454f3e7a1cbd79f5842969007ed4c0ae.tar.gz | |
Merge branch 'maint'
| -rw-r--r-- | lisp/org-element.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/org-element.el b/lisp/org-element.el index 8d16aa5..9188b3f 100644 --- a/lisp/org-element.el +++ b/lisp/org-element.el @@ -4095,8 +4095,9 @@ If STRING is the empty string or nil, return nil." (ignore-errors (if (symbolp v) (makunbound v) (set (make-local-variable (car v)) (cdr v))))) - (insert string) - (restore-buffer-modified-p nil) + ;; Transferring local variables may put the temporary buffer + ;; into a read-only state. Make sure we can insert STRING. + (let ((inhibit-read-only t)) (insert string)) (org-element--parse-objects (point-min) (point-max) nil restriction parent)))))) |