# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1231727528 0
# Node ID bed84e5170a805d765bb78b39decf64aedf2bbd8
# Parent  d2b9a5feaf33817f8fd2544b70515574d79eec83
(Finternal_set_lisp_face_attribute): If setting the family, clear the
font width index too.

diff -r d2b9a5feaf33 -r bed84e5170a8 src/xfaces.c
--- a/src/xfaces.c	Mon Jan 12 02:31:52 2009 +0000
+++ b/src/xfaces.c	Mon Jan 12 02:32:08 2009 +0000
@@ -3341,6 +3341,12 @@
 	 the attribute is mandatory.  Also, clear the average
 	 width.  */
       font_clear_prop (XVECTOR (lface)->contents, prop_index);
+
+      /* If we are setting QCfamily, clear out FONT_WIDTH_INDEX as
+	 well.  This avoids rejecting valid families that lack support
+	 for a particular width.  */
+      if (prop_index == FONT_FAMILY_INDEX)
+	font_clear_prop (XVECTOR (lface)->contents, FONT_WIDTH_INDEX);
     }
 
   /* Changing a named face means that all realized faces depending on