From be9442ad0322d715edbe1ecad8e28ab9701288b6 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Wed, 14 May 2008 12:28:17 +0000 Subject: [PATCH] (font_clear_cache): Check if the cached vector of entities is nil or not. --- src/ChangeLog | 2 ++ src/font.c | 2 +- 2 files changed, 3 insertions(+), 1 deletion(-) diff --git a/src/ChangeLog b/src/ChangeLog index 223356eaad2..1b897b8403b 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,6 +1,8 @@ 2008-05-14 Kenichi Handa * font.c (font_prop_validate): Make nil a valid value. + (font_clear_cache): Check if the cached vector of entities is nil + or not. 2008-05-14 YAMAMOTO Mitsuharu diff --git a/src/font.c b/src/font.c index c5cf732bfe9..107426e6d6f 100644 --- a/src/font.c +++ b/src/font.c @@ -2237,7 +2237,7 @@ font_clear_cache (f, cache, driver) for (tail = XCDR (XCDR (cache)); CONSP (tail); tail = XCDR (tail)) { elt = XCAR (tail); - if (CONSP (elt) && FONT_SPEC_P (XCAR (elt))) + if (CONSP (elt) && FONT_SPEC_P (XCAR (elt)) && VECTORP (XCDR (elt))) { Lisp_Object vec = XCDR (elt); int i;