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

(font_clear_prop): When clearing font width, clear the average width

Browse source 
field too.
This commit is contained in:
Chong Yidong 2008-10-14 14:41:20 +00:00
parent 050a81e9b2
commit e234927a7e
1 changed files with 5 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
src/font.c
View file

@ -2996,7 +2996,9 @@ font_clear_prop (attrs, prop)
if (! FONTP (font))
return;
if (NILP (AREF (font, prop))
&& prop != FONT_FAMILY_INDEX && prop != FONT_FOUNDRY_INDEX
&& prop != FONT_FAMILY_INDEX
&& prop != FONT_FOUNDRY_INDEX
&& prop != FONT_WIDTH_INDEX
&& prop != FONT_SIZE_INDEX)
return;
font = Fcopy_font_spec (font);
@ -3018,6 +3020,8 @@ font_clear_prop (attrs, prop)
ASET (font, FONT_SPACING_INDEX, Qnil);
ASET (font, FONT_AVGWIDTH_INDEX, Qnil);
}
else if (prop == FONT_WIDTH_INDEX)
ASET (font, FONT_AVGWIDTH_INDEX, Qnil);
attrs[LFACE_FONT_INDEX] = font;
}