From 99efd883a238f7fdbf36a919daa282536e3f5b4b Mon Sep 17 00:00:00 2001 From: Artur Malabarba Date: Sun, 19 Apr 2015 14:01:45 +0100 Subject: Rename sub-sup face to sub-sup-tag --- sx-question-print.el | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) (limited to 'sx-question-print.el') diff --git a/sx-question-print.el b/sx-question-print.el index f99b4be..4a1c4f7 100644 --- a/sx-question-print.el +++ b/sx-question-print.el @@ -97,11 +97,6 @@ Some faces of this mode might be defined in the `sx-user' group." "Face used for downvoted score in the question buffer." :group 'sx-question-mode-faces) -(defface sx-question-mode-sub-sup - '((t :height 0.7)) - "Face used on and tags." - :group 'sx-question-mode-faces) - (defcustom sx-question-mode-header-tags "\nTags: " "String used before the question tags at the header." :type 'string @@ -552,6 +547,11 @@ font-locks code-blocks according to mode." (defconst sx-question-mode--html-tag-regexp (rx "<" (group-n 1 "%s") (* (not (any ">"))) ">")) +(defface sx-question-mode-sub-sup-tag + '((t :height 0.7)) + "Face used on and tags." + :group 'sx-question-mode-faces) + (defun sx-question-mode--inside-code-p () "Return non-nil if point is inside code. This can be inline Markdown code or a Markdown code-block." @@ -591,10 +591,10 @@ END-MARKER should be a marker." (add-text-properties l r '(face markdown-inline-code-face))) ((string= tag "sub") (add-text-properties - l r '(face sx-question-mode-sub-sup display (raise -0.3)))) + l r '(face sx-question-mode-sub-sup-tag display (raise -0.3)))) ((string= tag "sup") (add-text-properties - l r '(face sx-question-mode-sub-sup display (raise +0.3)))))))))))) + l r '(face sx-question-mode-sub-sup-tag display (raise +0.3)))))))))))) ;;; Handling links -- cgit v1.2.3