org-src: Reset buffer-modified-p after fontifying
* lisp/org-src.el (org-src-font-lock-fontify-block): Reset the modification flag of the temporary fontification buffer after fontifying. Without this some modes cause Emacs to prompt about unsaved buffers when exiting: "Save buffer *org-src-fontification:...-mode*?".
This commit is contained in:
parent
27edae8ced
commit
ebd06c15b5
|
@ -642,7 +642,8 @@ as `org-src-fontify-natively' is non-nil."
|
||||||
(put-text-property
|
(put-text-property
|
||||||
(+ start (1- pos)) (1- (+ start next)) prop new-prop
|
(+ start (1- pos)) (1- (+ start next)) prop new-prop
|
||||||
org-buffer)))
|
org-buffer)))
|
||||||
(setq pos next))))
|
(setq pos next)))
|
||||||
|
(set-buffer-modified-p nil))
|
||||||
;; Add Org faces.
|
;; Add Org faces.
|
||||||
(let ((src-face (nth 1 (assoc-string lang org-src-block-faces t))))
|
(let ((src-face (nth 1 (assoc-string lang org-src-block-faces t))))
|
||||||
(when (or (facep src-face) (listp src-face))
|
(when (or (facep src-face) (listp src-face))
|
||||||
|
|
Loading…
Reference in New Issue