From: Po Lu <luangruo@yahoo.com>
Date: Sat, 29 Jan 2022 06:05:49 +0000 (+0800)
Subject: Fix a default value of the `:underline' face attribute
X-Git-Tag: emacs-29.0.90~2676
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7e17749ada101fbfb772a79deda5f7087ba9e96d;p=emacs.git

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.
---

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)