* eldoc-box.el (eldoc-box-markdown-separator): New face.
This commit is contained in:
parent
06c905bb4a
commit
c36f31074b
@ -84,6 +84,10 @@
|
|||||||
(defface eldoc-box-body '((t . nil))
|
(defface eldoc-box-body '((t . nil))
|
||||||
"Body face used in documentation childframe.")
|
"Body face used in documentation childframe.")
|
||||||
|
|
||||||
|
(defface eldoc-box-markdown-separator '((t . ( :strike-through t
|
||||||
|
:height 0.4)))
|
||||||
|
"Face for the separator line in Markdown.")
|
||||||
|
|
||||||
(defcustom eldoc-box-lighter " ELDOC-BOX"
|
(defcustom eldoc-box-lighter " ELDOC-BOX"
|
||||||
"Mode line lighter for all eldoc-box modes.
|
"Mode line lighter for all eldoc-box modes.
|
||||||
If the value is nil, no lighter is displayed."
|
If the value is nil, no lighter is displayed."
|
||||||
@ -723,8 +727,7 @@ childframe."
|
|||||||
(prop-match-beginning prop)
|
(prop-match-beginning prop)
|
||||||
(prop-match-end prop)
|
(prop-match-end prop)
|
||||||
`( display ,eldoc-box--markdown-separator-display-props
|
`( display ,eldoc-box--markdown-separator-display-props
|
||||||
face ( :strike-through t
|
face eldoc-box-markdown-separator))))))
|
||||||
:height 0.4)))))))
|
|
||||||
|
|
||||||
(defun eldoc-box--replace-en-space ()
|
(defun eldoc-box--replace-en-space ()
|
||||||
"Display the en spaces in documentation as regular spaces."
|
"Display the en spaces in documentation as regular spaces."
|
||||||
|
Loading…
Reference in New Issue
Block a user