bug#10148: 24.0.91; "pending" regexp Isearch

[Juri Linkov <juri@jurta.org>]

[-- Attachment #1: Type: text/plain, Size: 384 bytes --]

>>> This was ten years ago, and "pending" is still somewhat confusing
>>
>> Do you really see that "pending"? ;-)  We removed it recently in bug#52356.
>
> The test case on the current trunk still says "Pending" -- emacs -Q, C-u
> C-s i s * -> pending.

If no one wants "Pending" anywhere, then this patch removes its
remaining occurrences (bug#52356 removed other two occurrences):


[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: isearch-fallback.patch --]
[-- Type: text/x-diff, Size: 848 bytes --]

diff --git a/lisp/isearch.el b/lisp/isearch.el
index be0227b6e7..9f848dd229 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -2858,7 +2911,7 @@ isearch-fallback
 		 allow-invalid))
     (if to-barrier
 	(progn (goto-char isearch-barrier)
-	       (setq isearch-adjusted t))
+	       (setq isearch-adjusted 'fallback))
       (let* ((stack isearch-cmds)
 	     (previous (cdr stack))	; lookbelow in the stack
 	     (frame (car stack)))
@@ -2893,7 +2946,7 @@ isearch-fallback
 	    (goto-char (if isearch-forward
 			   (max last-other-end isearch-barrier)
 			 (min last-other-end isearch-barrier)))
-	    (setq isearch-adjusted t)))))))
+	    (setq isearch-adjusted 'fallback)))))))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;; scrolling within Isearch mode.  Alan Mackenzie (acm@muc.de), 2003/2/24