aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuri Linkov2013-08-27 18:57:16 +0300
committerJuri Linkov2013-08-27 18:57:16 +0300
commit26f98a7d3fb2ed8b5bb1befcd8e8507de516db34 (patch)
tree85b13c6192d2ab30205507e1914c07bbf2c5bdf2
parent3ed86db9c6ab0beb6cbe76e1ac5685856e8f8c59 (diff)
downloademacs-26f98a7d3fb2ed8b5bb1befcd8e8507de516db34.tar.gz
emacs-26f98a7d3fb2ed8b5bb1befcd8e8507de516db34.zip
* lisp/isearch.el (isearch-quote-char): Comment out converting unibyte
to multibyte, thus syncing with its `quoted-insert' counterpart. Fixes: debbugs:15166
-rw-r--r--lisp/ChangeLog6
-rw-r--r--lisp/isearch.el12
2 files changed, 14 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 60f770b3e0c..822d0eaf17f 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
12013-08-27 Juri Linkov <juri@jurta.org>
2
3 * isearch.el (isearch-quote-char): Comment out converting unibyte
4 to multibyte, thus syncing with its `quoted-insert' counterpart.
5 (Bug#15166)
6
12013-08-27 Martin Rudalics <rudalics@gmx.at> 72013-08-27 Martin Rudalics <rudalics@gmx.at>
2 8
3 * window.el (display-buffer-use-some-window): Add missing 9 * window.el (display-buffer-use-some-window): Add missing
diff --git a/lisp/isearch.el b/lisp/isearch.el
index 3ff75059b1a..345e7d8b4e9 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -2430,10 +2430,14 @@ With argument, add COUNT copies of the character."
2430 (if (subregexp-context-p isearch-string (length isearch-string)) 2430 (if (subregexp-context-p isearch-string (length isearch-string))
2431 (isearch-process-search-string "[ ]" " ") 2431 (isearch-process-search-string "[ ]" " ")
2432 (isearch-process-search-char char count)) 2432 (isearch-process-search-char char count))
2433 (and enable-multibyte-characters 2433 ;; This used to assume character codes 0240 - 0377 stand for
2434 (>= char ?\200) 2434 ;; characters in some single-byte character set, and converted them
2435 (<= char ?\377) 2435 ;; to Emacs characters. But in 23.1 this feature is deprecated
2436 (setq char (unibyte-char-to-multibyte char))) 2436 ;; in favor of inserting the corresponding Unicode characters.
2437 ;; (and enable-multibyte-characters
2438 ;; (>= char ?\200)
2439 ;; (<= char ?\377)
2440 ;; (setq char (unibyte-char-to-multibyte char)))
2437 (isearch-process-search-char char count)))) 2441 (isearch-process-search-char char count))))
2438 2442
2439(defun isearch-printing-char (&optional char count) 2443(defun isearch-printing-char (&optional char count)