# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1039465415 0
# Node ID 25ef28e528f4bf6ee317880dfdaa46ccd089f3da
# Parent  c41c265141e2f848eece67a0901f13b6ebc0c4c0
(isearch-no-upper-case-p): \\ only quotes one character.

diff -r c41c265141e2 -r 25ef28e528f4 lisp/isearch.el
--- a/lisp/isearch.el	Mon Dec 09 20:12:57 2002 +0000
+++ b/lisp/isearch.el	Mon Dec 09 20:23:35 2002 +0000
@@ -1871,7 +1871,8 @@
 	(if (and regexp-flag (eq char ?\\))
 	    (setq quote-flag (not quote-flag))
 	  (if (and (not quote-flag) (not (eq char (downcase char))))
-	      (setq found t))))
+	      (setq found t))
+	  (setq quote-flag nil)))
       (setq i (1+ i)))
     (not found)))