[Emacs-diffs] trunk r114028: * lisp/isearch.el (isearch-quote-char): Comment out converting unibyte

[Juri Linkov]

------------------------------------------------------------
revno: 114028
revision-id: address@hidden
parent: address@hidden
fixes bug: http://debbugs.gnu.org/15166
committer: Juri Linkov <address@hidden>
branch nick: trunk
timestamp: Tue 2013-08-27 18:57:16 +0300
message:
  * lisp/isearch.el (isearch-quote-char): Comment out converting unibyte
  to multibyte, thus syncing with its `quoted-insert' counterpart.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/isearch.el                isearch.el-20091113204419-o5vbwnq5f7feedwu-486

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-08-27 12:46:00 +0000
+++ b/lisp/ChangeLog    2013-08-27 15:57:16 +0000
@@ -1,3 +1,9 @@
+2013-08-27  Juri Linkov  <address@hidden>
+
+       * isearch.el (isearch-quote-char): Comment out converting unibyte
+       to multibyte, thus syncing with its `quoted-insert' counterpart.
+       (Bug#15166)
+
 2013-08-27  Martin Rudalics  <address@hidden>
 
        * window.el (display-buffer-use-some-window): Add missing

=== modified file 'lisp/isearch.el'
--- a/lisp/isearch.el   2013-08-08 23:59:14 +0000
+++ b/lisp/isearch.el   2013-08-27 15:57:16 +0000
@@ -2430,10 +2430,14 @@
        (if (subregexp-context-p isearch-string (length isearch-string))
            (isearch-process-search-string "[ ]" " ")
          (isearch-process-search-char char count))
-      (and enable-multibyte-characters
-          (>= char ?\200)
-          (<= char ?\377)
-          (setq char (unibyte-char-to-multibyte char)))
+      ;; This used to assume character codes 0240 - 0377 stand for
+      ;; characters in some single-byte character set, and converted them
+      ;; to Emacs characters.  But in 23.1 this feature is deprecated
+      ;; in favor of inserting the corresponding Unicode characters.
+      ;; (and enable-multibyte-characters
+      ;;      (>= char ?\200)
+      ;;      (<= char ?\377)
+      ;;      (setq char (unibyte-char-to-multibyte char)))
       (isearch-process-search-char char count))))
 
 (defun isearch-printing-char (&optional char count)