Bladeren bron

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>
Ted Zlatanov 14 jaren geleden
bovenliggende
commit
b3aad7ffa8
1 gewijzigde bestanden met toevoegingen van 5 en 0 verwijderingen
  1. 5 0
      lisp/org.el

+ 5 - 0
lisp/org.el

@@ -5157,6 +5157,11 @@ will be prompted for."
   :group 'org-babel)
 
 (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."
   (let ((case-fold-search t))
     (if (re-search-forward