From: Kenichi Handa <handa@m17n.org>
Date: Wed, 28 Jan 2009 06:45:07 +0000 (+0000)
Subject: (font_for_char): Use assq_no_quit, not assoc_no_quit.
X-Git-Tag: emacs-pretest-23.0.90~121
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9fe788041ce00d291931fe6cc685526949a50990;p=emacs.git

(font_for_char): Use assq_no_quit, not assoc_no_quit.
---

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));