# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 868517095 0
# Node ID e960f779eed3e291cd48bf541db1a75f5d7d3ab7
# Parent  a82b89790f9c01eb2a13e2e1870fa50462e6eb03
(isearch-message-prefix): Adjusted
for the previous change of variables related to input methods.

diff -r a82b89790f9c -r e960f779eed3 lisp/isearch.el
--- a/lisp/isearch.el	Thu Jul 10 06:43:19 1997 +0000
+++ b/lisp/isearch.el	Thu Jul 10 06:44:55 1997 +0000
@@ -522,6 +522,7 @@
 	isearch-small-window nil
 	isearch-just-started t
 	isearch-multibyte-characters-flag nil
+	isearch-input-method nil
 
 	isearch-opoint (point)
 	search-ring-yank-pointer nil
@@ -1172,7 +1173,7 @@
 (defun isearch-printing-char ()
   "Add this ordinary printing character to the search string and search."
   (interactive)
-  (if isearch-multibyte-characters-flag
+  (if isearch-input-method
       (isearch-process-search-multibyte-characters (isearch-last-command-char))
     (isearch-process-search-char (isearch-last-command-char))))
 
@@ -1408,8 +1409,8 @@
 		   (if isearch-regexp "regexp " "")
 		   (if nonincremental "search" "I-search")
 		   (if isearch-forward "" " backward")
-		   (if isearch-multibyte-characters-flag
-		       (concat " [" default-input-method-title "]: ")
+		   (if isearch-input-method
+		       (concat " [" isearch-input-method-title "]: ")
 		     ": ")
 		   )))
     (aset m 0 (upcase (aref m 0)))