branch: elpa/markdown-mode commit c9c9ec6bcdf0562af2c29dd4a063f25ba8eb20b6 Author: Joe Reinhart <joseph.reinh...@gmail.com> Commit: Joe Reinhart <joseph.reinh...@gmail.com>
Use markdown--markup-props instead of recreating as mp --- markdown-mode.el | 9 ++------- 1 file changed, 2 insertions(+), 7 deletions(-) diff --git a/markdown-mode.el b/markdown-mode.el index fdfaba1f3c..c3aadff3b7 100644 --- a/markdown-mode.el +++ b/markdown-mode.el @@ -8340,19 +8340,14 @@ Translate filenames using `markdown-filename-translate-function'." (url-end (match-end 2))) (unless (or (markdown-in-inline-code-p url-start) (markdown-in-inline-code-p url-end)) - (let* (;; Markup part - (mp (list 'face 'markdown-markup-face - 'invisible 'markdown-markup - 'rear-nonsticky t - 'font-lock-multiline t)) - ;; URI part + (let* (;; URI part (up (list 'keymap markdown-mode-mouse-map 'face 'markdown-plain-url-face 'font-lock-multiline t))) (when markdown-mouse-follow-link (setq up (append up '(mouse-face markdown-highlight-face)))) (dolist (g '(1 3)) - (add-text-properties (match-beginning g) (match-end g) mp)) + (add-text-properties (match-beginning g) (match-end g) markdown--markup-props)) (add-text-properties url-start url-end up) t)))))