From ca9c612208a2528a27b648973cfbf6e8d0801f94 Mon Sep 17 00:00:00 2001 From: Florian Beck Date: Thu, 21 Mar 2013 21:15:50 +0100 Subject: [PATCH] Unescape :help-echo for links * lisp/org.el (org-activate-bracket-links): remove escapes from help string TINYCHANGE --- lisp/org.el | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index 7aac63b..3fbd549 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -5806,10 +5806,7 @@ by a #." (if (and (re-search-forward org-bracket-link-regexp limit t) (not (org-in-src-block-p))) (let* ((hl (org-match-string-no-properties 1)) - (help (concat "LINK: " hl)) - ;; FIXME: Above we should remove the escapes. But that - ;; requires another match, protecting match data, a lot - ;; of overhead for font-lock. + (help (concat "LINK: " (save-match-data (org-link-unescape hl)))) (ip (org-maybe-intangible (list 'invisible 'org-link 'keymap org-mouse-map 'mouse-face 'highlight -- 1.7.10.4