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.
This commit is contained in:
Po Lu 2022-01-20 13:06:51 +08:00
parent 5404bf50ad
commit a43b665605

View file

@ -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;