# HG changeset patch
# User YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
# Date 1259051852 0
# Node ID da3ca3481c0b5e8e28bc36c386b00911080b7447
# Parent  8653ee60213717450438030b280b0a3ab80153c5
(font_open_entity): Don't use ASET if font_object is Qnil.

diff -r 8653ee602137 -r da3ca3481c0b src/font.c
--- a/src/font.c	Tue Nov 24 07:47:45 2009 +0000
+++ b/src/font.c	Tue Nov 24 08:37:32 2009 +0000
@@ -3007,7 +3007,8 @@
     return Qnil;
 
   font_object = driver_list->driver->open (f, entity, scaled_pixel_size);
-  ASET (font_object, FONT_SIZE_INDEX, make_number (pixel_size));
+  if (!NILP (font_object))
+    ASET (font_object, FONT_SIZE_INDEX, make_number (pixel_size));
   FONT_ADD_LOG ("open", entity, font_object);
   if (NILP (font_object))
     return Qnil;