mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-05 22:20:24 -08:00
Code Issues Projects Releases Wiki Activity

; * src/xfaces.c (face_inheritance_cycle): More defensive code.

Browse source
This commit is contained in:
Eli Zaretskii 2025-10-29 19:26:40 +02:00
parent 8c7b4391a5
commit 1472f8241d
1 changed files with 2 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

5
src/xfaces.c
View file

@ -2442,7 +2442,7 @@ face_inheritance_cycle (struct frame *f, Lisp_Object face, Lisp_Object child)
if (CONSP (face))
{
Lisp_Object tail;
for (tail = face; !NILP (tail); tail = XCDR (tail))
for (tail = face; CONSP (tail); tail = XCDR (tail))
{
ok = get_lface_attributes (NULL, f, XCAR (tail), face_attrs,
false, NULL);
@ -2460,9 +2460,8 @@ face_inheritance_cycle (struct frame *f, Lisp_Object face, Lisp_Object child)
break;
}
}
else
else if (SYMBOLP (face))
{
eassert (SYMBOLP (face));
ok = get_lface_attributes (NULL, f, face, face_attrs, false, NULL);
if (ok)
{