From b3aad7ffa8d1ffb77fdaa754b15f49201bab655c Mon Sep 17 00:00:00 2001 From: Ted Zlatanov Date: Mon, 20 Jun 2011 11:23:44 +0200 Subject: [PATCH] Do not error out on fontification errors * org.el (org-fontify-meta-lines-and-blocks): Ignore errors. Signed-off-by: Julien Danjou --- lisp/org.el | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/lisp/org.el b/lisp/org.el index fee317441..186831024 100644 --- a/lisp/org.el +++ b/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