mirror/org-mode
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-11-26 07:33:39 +00:00
Code

Fix a bug in in-buffer src fontification

Browse Source 
* lisp/org-src.el: Append a space character to copied text so that the
                   final text property change is picked up correctly
This commit is contained in:
Dan Davison 2011-06-17 16:51:17 -07:00
parent f422849557
commit 4f3a31dd97
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/org-src.el
View File

@ -774,7 +774,7 @@ fontification of code blocks see `org-src-fontify-block' and
(get-buffer-create
(concat " org-src-fontification:" (symbol-name lang-mode)))
(delete-region (point-min) (point-max))
(insert string)
(insert (concat string " ")) ;; so there's a final property change
(unless (eq major-mode lang-mode) (funcall lang-mode))
(font-lock-fontify-buffer)
(setq pos (point-min))