[Top][All Lists]

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[O] [PATCH] Change fontification order for links

From: Christophe Junke
Subject: [O] [PATCH] Change fontification order for links
Date: Fri, 16 Nov 2012 11:40:18 +0100

* lisp/org.el (org-set-font-lock-defaults): let footnote fontifications
  be done before other links' fontification. This allows links appearing
  inside footnotes to be both visible and active.

 lisp/org.el |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/org.el b/lisp/org.el
index cfd8651..15b73aa 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -5901,13 +5901,13 @@ needs to be inserted at a specific position in the 
font-lock sequence.")
                 '(1 'org-special-keyword t)
                 '(3 'org-property-value t))
           ;; Links
+          (if (memq 'footnote lk) '(org-activate-footnote-links))
           (if (memq 'tag lk) '(org-activate-tags (1 'org-tag prepend)))
           (if (memq 'angle lk) '(org-activate-angle-links (0 'org-link t)))
           (if (memq 'plain lk) '(org-activate-plain-links))
           (if (memq 'bracket lk) '(org-activate-bracket-links (0 'org-link t)))
           (if (memq 'radio lk) '(org-activate-target-links (0 'org-link t)))
           (if (memq 'date lk) '(org-activate-dates (0 'org-date t)))
-          (if (memq 'footnote lk) '(org-activate-footnote-links))
           '("^&?%%(.*\\|<%%([^>\n]*?>" (0 'org-sexp-date t))
           '(org-hide-wide-columns (0 nil append))
           ;; TODO keyword

reply via email to

[Prev in Thread] Current Thread [Next in Thread]