summaryrefslogtreecommitdiff
path: root/lisp/cus-face.el
diff options
context:
space:
mode:
authorPo Lu <luangruo@yahoo.com>2022-01-29 14:05:49 +0800
committerPo Lu <luangruo@yahoo.com>2022-01-29 14:05:49 +0800
commit7e17749ada101fbfb772a79deda5f7087ba9e96d (patch)
tree04993ff56e552e339a21b180cb70232ce5819af0 /lisp/cus-face.el
parent166556f464e7642b218a5488837512c4af77f227 (diff)
downloademacs-7e17749ada101fbfb772a79deda5f7087ba9e96d.tar.gz
Fix a default value of the `:underline' face attribute
* lisp/cus-face.el (custom-face-attributes): Add `:position' t default value of "On" for underlines.
Diffstat (limited to 'lisp/cus-face.el')
-rw-r--r--lisp/cus-face.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/cus-face.el b/lisp/cus-face.el
index 12ad3910fcb..80d0aaa0d51 100644
--- a/lisp/cus-face.el
+++ b/lisp/cus-face.el
@@ -133,7 +133,7 @@
:help-echo "Control text underlining."
(const :tag "Off" nil)
(list :tag "On"
- :value (:color foreground-color :style line)
+ :value (:color foreground-color :style line :position nil)
(const :format "" :value :color)
(choice :tag "Color"
(const :tag "Foreground Color" foreground-color)