From: Chong Yidong <cyd@stupidchicken.com>
Date: Sat, 24 Jan 2009 22:42:02 +0000 (+0000)
Subject: (fontset_font): If we know there is no font, don't do any work.
X-Git-Tag: emacs-pretest-23.0.90~229
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8657206e1dcc9ade323d8cbb213629723c46b222;p=emacs.git

(fontset_font): If we know there is no font, don't do any work.
---

diff --git a/src/fontset.c b/src/fontset.c
index eca79168ffb..983f4f0d044 100644
--- a/src/fontset.c
+++ b/src/fontset.c
@@ -660,6 +660,10 @@ fontset_font (fontset, c, face, id)
   Lisp_Object rfont_def;
   Lisp_Object base_fontset;
 
+  /* If we know there is no font of C, don't do any work.  */
+  if (EQ (fontset_ref (fontset, c), Qt))
+    return Qnil;
+
   /* Try a font-group of FONTSET. */
   rfont_def = fontset_find_font (fontset, c, face, id, 0);
   if (VECTORP (rfont_def))
@@ -696,7 +700,7 @@ fontset_font (fontset, c, face, id)
 	return rfont_def;
     }
 
-  /* Remeber that we have no font for C.  */
+  /* Remember that we have no font for C.  */
   FONTSET_SET (fontset, make_number (c), Qt);
 
   return Qnil;