procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(Fset_fontset_font): Check family element of a given vector.

Browse source
This commit is contained in:
Kenichi Handa 2005-01-30 11:42:04 +00:00
parent 09255d93bb
commit d19b3ee7f2
1 changed files with 2 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
src/fontset.c
View file

@ -1441,11 +1441,10 @@ appended. By default, FONT-SPEC overrides the previous settings. */)
CHECK_STRING (AREF (font_spec, j));
ASET (font_spec, j, Fdowncase (AREF (font_spec, j)));
}
family = AREF (font_spec, FONT_SPEC_FAMILY_INDEX);
/* REGISTRY should not be omitted. */
CHECK_STRING (AREF (font_spec, FONT_SPEC_REGISTRY_INDEX));
registry = Fdowncase (AREF (font_spec, FONT_SPEC_REGISTRY_INDEX));
ASET (font_spec, FONT_SPEC_REGISTRY_INDEX, registry);
registry = AREF (font_spec, FONT_SPEC_REGISTRY_INDEX);
}
else if (CONSP (font_spec))
{