diff options
Diffstat (limited to 'sx-question-print.el')
| -rw-r--r-- | sx-question-print.el | 14 |
1 files changed, 7 insertions, 7 deletions
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 <sub> and <sup> 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 <sub> and <sup> 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 |