(font_for_char): Use assq_no_quit, not assoc_no_quit.

diff --git a/src/ChangeLog b/src/ChangeLog
index 050b0c2..9b359f1 100644 (file)
--- 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 2eabef8..b69c650 100644 (file)
--- 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));