(font_for_char): Use assq_no_quit, not assoc_no_quit.

2 files changed, 5 insertions, 1 deletions

diff --git a/src/ChangeLog b/src/ChangeLog
index 050b0c20efe..9b359f166c3 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2009-01-28  Kenichi Handa  <handa@m17n.org>
+
+        * fontset.c (font_for_char): Use assq_no_quit, not assoc_no_quit.
+
 2009-01-27  Chong Yidong  <cyd@stupidchicken.com>
 
         * fns.c (concat): Check for string overflow (bug#1787).
diff --git a/src/fontset.c b/src/fontset.c
index 2eabef8cfc0..b69c650c7c5 100644
--- a/src/fontset.c
+++ b/src/fontset.c
@@ -970,7 +970,7 @@ font_for_char (face, c, pos, object)
         {
           Lisp_Object val;
 
-          val = assoc_no_quit (charset, Vfont_encoding_charset_alist);
+          val = assq_no_quit (charset, Vfont_encoding_charset_alist);
           if (CONSP (val) && CHARSETP (XCDR (val)))
             charset = XCDR (val);
           id = XINT (CHARSET_SYMBOL_ID (charset));