Mercurial > hg > xemacs-beta
diff lisp/isearch-mode.el @ 2030:488b2f76d852
[xemacs-hg @ 2004-04-19 08:54:47 by stephent]
assorted improvements in ./lisp/
<87llkswdr6.fsf@tleepslib.sk.tsukuba.ac.jp>
<87pta4we6g.fsf@tleepslib.sk.tsukuba.ac.jp>
author | stephent |
---|---|
date | Mon, 19 Apr 2004 08:54:50 +0000 |
parents | 442db3c3c43b |
children | 7dc50bbd7a39 |
line wrap: on
line diff
--- a/lisp/isearch-mode.el Mon Apr 19 08:16:33 2004 +0000 +++ b/lisp/isearch-mode.el Mon Apr 19 08:54:50 2004 +0000 @@ -874,7 +874,7 @@ ;; and really do quit. (progn (goto-char isearch-opoint) (setq isearch-success nil) - (isearch-done t) ; exit isearch + (isearch-done) ; exit and push target string (signal 'quit '(isearch))) ; and pass on quit signal ;; If search is failing, or has an incomplete regexp, ;; rub out until it is once more successful.