Mercurial > emacs
changeset 106433:7c2192f52cb6
Fix a comment and delete trailing whitespace.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Sat, 05 Dec 2009 20:09:49 +0000 |
| parents | a67d65733a07 |
| children | de4084d806f6 |
| files | src/font.c |
| diffstat | 1 files changed, 8 insertions(+), 8 deletions(-) [+] |
line wrap: on
line diff
--- a/src/font.c Sat Dec 05 19:49:47 2009 +0000 +++ b/src/font.c Sat Dec 05 20:09:49 2009 +0000 @@ -722,11 +722,11 @@ && NILP (Fstring_lessp (prop, XCAR (XCAR (extra))))) prev = extra, extra = XCDR (extra); - if (NILP (prev)) + if (NILP (prev)) ASET (font, FONT_EXTRA_INDEX, Fcons (Fcons (prop, val), extra)); - else + else XSETCDR (prev, Fcons (Fcons (prop, val), extra)); - + return val; } XSETCDR (slot, val); @@ -1507,7 +1507,7 @@ if (prop >= FONT_FOUNDRY_INDEX && prop < FONT_EXTRA_INDEX) ASET (font, prop, font_prop_validate (prop, Qnil, val)); - else + else { extra_props = nconc2 (extra_props, Fcons (Fcons (key, val), Qnil)); @@ -1524,7 +1524,7 @@ if (driver_list->driver->filter_properties) (*driver_list->driver->filter_properties) (font, extra_props); } - + } else { @@ -2403,7 +2403,7 @@ { int font_driver_preference = 0; Lisp_Object current_font_driver; - + if (best_only) vec = XCAR (tail); len = ASIZE (vec); @@ -2842,8 +2842,8 @@ /* Return a list of vectors of font-entities matching with SPEC on - FRAME. The elements of the list are in the same of order of - font-drivers. */ + FRAME. Each elements in the list is a vector of entities from the + same font-driver. */ Lisp_Object font_list_entities (frame, spec)