Do not error out on fontification errors
* org.el (org-fontify-meta-lines-and-blocks): Ignore errors. Signed-off-by: Julien Danjou <julien@danjou.info>
This commit is contained in:
parent
adf16ffdd7
commit
b3aad7ffa8
|
@ -5157,6 +5157,11 @@ will be prompted for."
|
||||||
:group 'org-babel)
|
:group 'org-babel)
|
||||||
|
|
||||||
(defun org-fontify-meta-lines-and-blocks (limit)
|
(defun org-fontify-meta-lines-and-blocks (limit)
|
||||||
|
(condition-case nil
|
||||||
|
(org-fontify-meta-lines-and-blocks-1 limit)
|
||||||
|
(error (message "org-mode fontification error"))))
|
||||||
|
|
||||||
|
(defun org-fontify-meta-lines-and-blocks-1 (limit)
|
||||||
"Fontify #+ lines and blocks, in the correct ways."
|
"Fontify #+ lines and blocks, in the correct ways."
|
||||||
(let ((case-fold-search t))
|
(let ((case-fold-search t))
|
||||||
(if (re-search-forward
|
(if (re-search-forward
|
||||||
|
|
Loading…
Reference in New Issue