# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 720655859 0
# Node ID dd292c7ef749e2aa0f62a7d6dc0ac80bfea715e4
# Parent  b86ef04321006e872be34d6981cecee5c2898db1
(isearch-search): Handle all sorts of errors from regexp search.

diff -r b86ef0432100 -r dd292c7ef749 lisp/isearch.el
--- a/lisp/isearch.el	Sat Oct 31 23:27:11 1992 +0000
+++ b/lisp/isearch.el	Sun Nov 01 22:10:59 1992 +0000
@@ -4,7 +4,7 @@
 ;; LCD Archive Entry:
 ;; isearch-mode|Daniel LaLiberte|liberte@cs.uiuc.edu
 ;; |A minor mode replacement for isearch.el.
-;; |$Date: 1992/10/20 21:21:47 $|$Revision: 1.12 $|~/modes/isearch-mode.el
+;; |$Date: 1992/10/27 04:11:46 $|$Revision: 1.13 $|~/modes/isearch-mode.el
 
 ;; This file is not yet part of GNU Emacs, but it is based almost
 ;; entirely on isearch.el which is part of GNU Emacs.
@@ -88,8 +88,12 @@
 ;;;====================================================================
 ;;; Change History
 
-;;; $Header: /gd/gnu/emacs/19.0/lisp/RCS/isearch-mode.el,v 1.12 1992/10/20 21:21:47 rms Exp rms $
+;;; $Header: /gd/gnu/emacs/19.0/lisp/RCS/isearch-mode.el,v 1.13 1992/10/27 04:11:46 rms Exp rms $
 ;;; $Log: isearch-mode.el,v $
+; Revision 1.13  1992/10/27  04:11:46  rms
+; (isearch-edit-string):
+; Bind cursor-in-echo-area only around read-char/allocate-event.
+;
 ; Revision 1.12  1992/10/20  21:21:47  rms
 ; (isearch-mode-map): Make the top-level keymap dense.
 ; Explicitly bind control characters at that level.
@@ -1307,7 +1311,10 @@
      (if (string-match
 	  "\\`Premature \\|\\`Unmatched \\|\\`Invalid "
 	  isearch-invalid-regexp)
-	 (setq isearch-invalid-regexp "incomplete input"))))
+	 (setq isearch-invalid-regexp "incomplete input")))
+    (error
+     ;; stack overflow in regexp search.
+     (setq isearch-invalid-regexp (car (cdr lossage)))))
 
   (if isearch-success
       nil