diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2008-08-04 13:35:02 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2008-08-04 13:35:02 +0000 |
| commit | d6ff002e6df7f25e7d1475be374e8947687df996 (patch) | |
| tree | da7b493f25da033acb8f29a6a8f85652784addb2 /lisp/international | |
| parent | 52a39a64566c102782470b78bb8f8e930853d9b8 (diff) | |
| download | emacs-d6ff002e6df7f25e7d1475be374e8947687df996.tar.gz | |
* international/mule-cmds.el (read-char-by-name):
Check UCS names with `assoc-string' and case folding.
Diffstat (limited to 'lisp/international')
| -rw-r--r-- | lisp/international/mule-cmds.el | 2 |
1 files changed, 1 insertions, 1 deletions
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. |