1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-07 20:30:32 -08:00

(fontset_from_font): Copy font_spec before changing

the elements.
This commit is contained in:
Kenichi Handa 2008-06-20 06:12:33 +00:00
parent d7afccca70
commit 9b9cd864a8
2 changed files with 4 additions and 0 deletions

View file

@ -1,5 +1,8 @@
2008-06-20 Kenichi Handa <handa@m17n.org>
* fontset.c (fontset_from_font): Copy font_spec before changing
the elements.
* xfns.c (x_default_font_parameter): Try "monospace-12" too.
2008-06-20 Stefan Monnier <monnier@iro.umontreal.ca>

View file

@ -1633,6 +1633,7 @@ fontset_from_font (font_object)
Vfontset_alias_alist = Fcons (Fcons (name, alias), Vfontset_alias_alist);
auto_fontset_alist = Fcons (Fcons (font_spec, fontset), auto_fontset_alist);
FONTSET_ASCII (fontset) = font_name;
font_spec = Fcopy_font_spec (font_spec);
ASET (font_spec, FONT_FOUNDRY_INDEX, Qnil);
ASET (font_spec, FONT_ADSTYLE_INDEX, Qnil);
for (i = FONT_WEIGHT_INDEX; i < FONT_EXTRA_INDEX; i++)