# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 931031104 0
# Node ID 036b2fb4944f345230ae8e11f1ea823700140023
# Parent  d95c8bcfe8ae589492120f9e7f992bf42e48fd07
(isearch-quote-char): Call unibyte-char-to-multibyte for \200...\240 also.
(isearch-printing-char): Use unibyte-char-to-multibyte.

diff -r d95c8bcfe8ae -r 036b2fb4944f lisp/isearch.el
--- a/lisp/isearch.el	Fri Jul 02 12:57:10 1999 +0000
+++ b/lisp/isearch.el	Sat Jul 03 19:45:04 1999 +0000
@@ -1200,11 +1200,11 @@
   "Quote special characters for incremental search."
   (interactive)
   (let ((char (read-quoted-char (isearch-message t))))
-    ;; Assume character codes 0240 - 0377 stand for characters in some
+    ;; Assume character codes 0200 - 0377 stand for characters in some
     ;; single-byte character set, and convert them to Emacs
     ;; characters.
     (and enable-multibyte-characters
-	 (>= char ?\240)
+	 (>= char ?\200)
 	 (<= char ?\377)
 	 (setq char (unibyte-char-to-multibyte char)))
     (isearch-process-search-char char)))
@@ -1224,7 +1224,7 @@
     (if (and enable-multibyte-characters
 	     (>= char ?\200)
 	     (<= char ?\377))
-	(isearch-process-search-char (+ char nonascii-insert-offset))
+	(isearch-process-search-char (unibyte-char-to-multibyte char))
       (if current-input-method
 	  (isearch-process-search-multibyte-characters char)
 	(isearch-process-search-char char)))))