(custom-variable-prompt): Doc change. Use custom-variable-p.

[gnu-emacs] / lisp / isearch.el

diff --git a/lisp/isearch.el b/lisp/isearch.el
index f0f8e5b4fbe1ddee0d3d407fca4fe3f900526069..5b9fe461068f7fe2b226411224c6b3b0bd2b3000 100644 (file)
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -978,7 +978,7 @@ Use `isearch-exit' to quit without signaling."
                (or (if isearch-regexp
                        (car regexp-search-ring)
                      (car search-ring))
-                   "")
+                   (error "No previous search string"))
                isearch-message
                (mapconcat 'isearch-text-char-description
                           isearch-string "")
@@ -1871,7 +1871,8 @@ since they have special meaning in a regexp."
        (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)))