diff options
| author | Chong Yidong <cyd@stupidchicken.com> | 2009-12-05 20:09:49 +0000 |
|---|---|---|
| committer | Chong Yidong <cyd@stupidchicken.com> | 2009-12-05 20:09:49 +0000 |
| commit | ce75f06e9110ceda73c75997a017f7c09dd9dd33 (patch) | |
| tree | 79bc4327339b62fb5c5ec6f64cc124e171c75ab4 /src/font.c | |
| parent | 30760c8bc78208568a28952738857aa0ab10ccd8 (diff) | |
| download | emacs-ce75f06e9110ceda73c75997a017f7c09dd9dd33.tar.gz emacs-ce75f06e9110ceda73c75997a017f7c09dd9dd33.tar.bz2 emacs-ce75f06e9110ceda73c75997a017f7c09dd9dd33.zip | |
Fix a comment and delete trailing whitespace.
Diffstat (limited to 'src/font.c')
| -rw-r--r-- | src/font.c | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/src/font.c b/src/font.c index a72e2215956..e9ae85a9766 100644 --- a/src/font.c +++ b/src/font.c @@ -722,11 +722,11 @@ font_put_extra (font, prop, val) && 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 @@ font_parse_fcname (name, font) 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 @@ font_parse_fcname (name, font) if (driver_list->driver->filter_properties) (*driver_list->driver->filter_properties) (font, extra_props); } - + } else { @@ -2403,7 +2403,7 @@ font_sort_entities (list, prefer, frame, best_only) { int font_driver_preference = 0; Lisp_Object current_font_driver; - + if (best_only) vec = XCAR (tail); len = ASIZE (vec); @@ -2842,8 +2842,8 @@ font_delete_unmatched (vec, spec, size) /* 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) |