From: Kenichi Handa <handa@m17n.org>
Date: Tue, 4 Jul 2006 03:22:09 +0000 (+0000)
Subject: (Fset_overriding_fontspec_internal): Check if we need
X-Git-Tag: emacs-pretest-22.0.90~1718
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=997c19d3c9f948247ed3a247024623122b592f22;p=emacs.git

(Fset_overriding_fontspec_internal): Check if we need
to update Voverriding_fontspec_alist.
---

diff --git a/src/fontset.c b/src/fontset.c
index 62ff3542b90..c8679a7b7e2 100644
--- a/src/fontset.c
+++ b/src/fontset.c
@@ -1621,6 +1621,8 @@ It is intended that this function is called only from
       elt = Fcons (target, Fcons (Qnil, Fcons (Qnil, elt)));
       XSETCAR (tail, elt);
     }
+  if (! NILP (Fequal (fontlist, Voverriding_fontspec_alist)))
+    return Qnil;
   Voverriding_fontspec_alist = fontlist;
   clear_face_cache (0);
   ++windows_or_buffers_changed;