diff options
author | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2019-01-21 21:45:10 +0100 |
---|---|---|
committer | Nicolas Goaziou <mail@nicolasgoaziou.fr> | 2019-01-21 21:45:10 +0100 |
commit | 5a63156b0165304104dcdc4b16437ec08e81f6d6 (patch) | |
tree | d2a36404f1e889f0431905ecfc1feacf0ce11b17 | |
parent | fadc83d4fe382436c3234dd2712fafe926cdaeea (diff) | |
download | org-mode-5a63156b0165304104dcdc4b16437ec08e81f6d6.tar.gz |
org-element: Parse secondary strings in read-only documents
* lisp/org-element.el (org-element-parse-secondary-string): Parse
secondary strings in read-only documents.
Reported-by: Michael Brand <michael.ch.brand@gmail.com>
<http://lists.gnu.org/r/emacs-orgmode/2019-01/msg00271.html>
-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)))))) |