Can't isearch for non-ASCII text

[Katsumi Yamaoka]

>>>>> In the gmane.emacs.diffs newsgroup, Kim F. Storm wrote:

> Index: isearch.el
> ===================================================================
> RCS file: /cvsroot/emacs/emacs/lisp/isearch.el,v
> retrieving revision 1.294
> retrieving revision 1.295
> diff -u -b -r1.294 -r1.295
> --- isearch.el        15 Feb 2007 16:54:09 -0000      1.294
> +++ isearch.el        1 Mar 2007 22:28:14 -0000       1.295
> @@ -1957,8 +1957,9 @@
>                      (concat " [" current-input-method-title "]: ")
>                    ": ")
>                  )))
> -    (propertize (concat (upcase (substring m 0 1)) (substring m 1))
> -             'face 'minibuffer-prompt)))
> +    (apply 'propertize
> +        (concat (upcase (substring m 0 1)) (substring m 1))
> +        minibuffer-prompt-properties)))

This change disables me from searching for non-ASCII text because
of the `read-only' property in `minibuffer-prompt-properties'.
When I type `C-s RET C-\' in order to enter Japanese text to
search for, I get the following error[1]:

Debugger entered--Lisp error: (text-read-only)
  read-from-minibuffer(#("Search: " 0 8 (read-only t face minibuffer-prompt))...
  byte-code(...
  isearch-edit-string()
  isearch-exit()
  call-interactively(isearch-exit)

Since this is a popular way to enter at least Japanese text for
isearch, please fix it.

[1] To get this error, I eval'd the form:
(put 'text-read-only 'error-conditions '(text-read-only error))

Regards,