From 5070e37aaae6f952bab022c71212fabb7549105e Mon Sep 17 00:00:00 2001 From: Mark Shoulson Date: Tue, 8 May 2012 15:15:10 -0400 Subject: [PATCH] Fix for displaying certain "pretty" entities MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="------------1.7.7.6" This is a multi-part message in MIME format. --------------1.7.7.6 Content-Type: text/plain; charset=UTF-8; format=fixed Content-Transfer-Encoding: 8bit * org.el (org-fontify-entities): fix bug: The entities \sup[123] and \there4 were not "prettified" when org-pretty-entities was enabled. TINYCHANGE --- lisp/org.el | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) --------------1.7.7.6 Content-Type: text/x-patch; name="0001-Fix-for-displaying-certain-pretty-entities.patch" Content-Transfer-Encoding: 8bit Content-Disposition: attachment; filename="0001-Fix-for-displaying-certain-pretty-entities.patch" diff --git a/lisp/org.el b/lisp/org.el index 66f9c3e..1d2955f 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -5954,7 +5954,7 @@ needs to be inserted at a specific position in the font-lock sequence.") (when org-pretty-entities (catch 'match (while (re-search-forward - "\\\\\\(frac[13][24]\\|[a-zA-Z]+\\)\\($\\|{}\\|[^[:alpha:]\n]\\)" + "\\\\\\(there4\\|sup[123]\\|frac[13][24]\\|[a-zA-Z]+\\)\\($\\|{}\\|[^[:alpha:]\n]\\)" limit t) (if (and (not (org-in-indented-comment-line)) (setq ee (org-entity-get (match-string 1))) --------------1.7.7.6--