Re: Why is `C-x 8' limited to Latin-1 for search?

[Juri Linkov <juri@jurta.org>]

> To try the latter quickly (no, this is not the way to code this; it's just a
> quick way to let you try it):
>
> (unless (fboundp 'ORIG-isearch-edit-string)
>   (defalias 'ORIG-isearch-edit-string
>             (symbol-function 'isearch-edit-string)))
>
> (defun isearch-edit-string ()
>   (interactive)
>   (let ((enable-recursive-minibuffers  t))
>     (ORIG-isearch-edit-string)))
>
> In a buffer with some Unicode chars, e.g., `λ':
>
> C-s M-e C-x 8 RET GREEK SMALL LETTER LAMBDA C-s
>
> (You have completion for the character name, at least.)

Shouldn't users be able to insert Unicode characters in any minibuffer,
not only in `isearch-edit-string'?  If these is no reason to disallow,
this patch should allow this for `completing-read' in `read-char-by-name':

=== modified file 'lisp/international/mule-cmds.el'
--- lisp/international/mule-cmds.el	2012-10-16 23:09:00 +0000
+++ lisp/international/mule-cmds.el	2012-12-10 07:43:46 +0000
@@ -2945,7 +2945,8 @@ (defun read-char-by-name (prompt)
 This function also accepts a hexadecimal number of Unicode code
 point or a number in hash notation, e.g. #o21430 for octal,
 #x2318 for hex, or #10r8984 for decimal."
-  (let ((input
+  (let* ((enable-recursive-minibuffers t)
+	 (input
          (completing-read
           prompt
           (lambda (string pred action)