summaryrefslogtreecommitdiff
path: root/src/xfaces.c
diff options
context:
space:
mode:
authorPo Lu <luangruo@yahoo.com>2022-01-20 13:06:51 +0800
committerPo Lu <luangruo@yahoo.com>2022-01-20 13:06:51 +0800
commita43b6656056bab1016030668f8e579c75a33724b (patch)
tree23c133821932892f9ebe52966b15ab537ff5b427 /src/xfaces.c
parent5404bf50ad6f52180a3cf2f347e8663b52e12ede (diff)
downloademacs-a43b6656056bab1016030668f8e579c75a33724b.tar.gz
Make `nil' values of the `:position' underline property work correctly
* src/xfaces.c (Finternal_set_lisp_face_attribute): Handle cases where the underline property `:position' is nil.
Diffstat (limited to 'src/xfaces.c')
-rw-r--r--src/xfaces.c5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/xfaces.c b/src/xfaces.c
index e148b5d3987..6a279f87192 100644
--- a/src/xfaces.c
+++ b/src/xfaces.c
@@ -3165,14 +3165,15 @@ FRAME 0 means change the face on all frames, and change the default
*/
valid_p = true;
- while (!NILP (CAR_SAFE(list)))
+ while (!NILP (CAR_SAFE (list)))
{
key = CAR_SAFE (list);
list = CDR_SAFE (list);
val = CAR_SAFE (list);
list = CDR_SAFE (list);
- if (NILP (key) || NILP (val))
+ if (NILP (key) || (NILP (val)
+ && !EQ (key, QCposition)))
{
valid_p = false;
break;