* 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 26a6c2b0800547523d2acbb2da4bdfef31094009..eb44fb00656ad6e089c0439da00b4a111481f732 100644 (file)
--- 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 c5b05d629aa01dacc7bc2e71251fa84b9a4d3b51..be3f53d2484d5730b8c2db838bcee013ae9eeca7 100644 (file)
--- 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.