From: Juanma Barranquero <lekktu@gmail.com>
Date: Mon, 4 Aug 2008 13:35:02 +0000 (+0000)
Subject: * international/mule-cmds.el (read-char-by-name):
X-Git-Tag: emacs-pretest-23.0.90~3666
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=d6ff002e6df7f25e7d1475be374e8947687df996;p=emacs.git

* international/mule-cmds.el (read-char-by-name):
  Check UCS names with `assoc-string' and case folding.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 26a6c2b0800..eb44fb00656 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,8 +1,13 @@
+2008-08-04  Juanma Barranquero  <lekktu@gmail.com>
+
+	* international/mule-cmds.el (read-char-by-name):
+	Check UCS names with `assoc-string' and case folding.
+
 2008-08-04  Michael Albinus  <michael.albinus@gmx.de>
 
 	* net/dbus.el (dbus-call-method-asynchronously)
-	(dbus-method-return-internal, dbus-method-error-internal): Declare
-	them with `declare-function'.
+	(dbus-method-return-internal, dbus-method-error-internal):
+	Declare them with `declare-function'.
 
 2008-08-04  Juanma Barranquero  <lekktu@gmail.com>
 
@@ -17,7 +22,7 @@
 
 	* ido.el (ido-mode): Add toggle notification.
 
-	* cus-edit.el (custom-save-all): Avoid destrying symlink if
+	* cus-edit.el (custom-save-all): Avoid destroying symlink if
 	already visiting the custom file.
 
 	* pgg-gpg.el (pgg-gpg-process-region): Accept any remaining
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index c5b05d629aa..be3f53d2484 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -2877,7 +2877,7 @@ for decimal.  Returns a character as a number."
      ((string-match "^#" input)
       (read input))
      (t
-      (cdr (assoc input (ucs-names)))))))
+      (cdr (assoc-string input (ucs-names) t))))))
 
 (defun ucs-insert (arg)
   "Insert a character of the given Unicode code point.