comparison lisp/isearch.el @ 5196:87d3df5d0e4e

Undo last change.
author Roland McGrath <roland@gnu.org>
date Fri, 26 Nov 1993 22:20:23 +0000
parents 9c64f67c4683
children 9e91acab81e9
comparison
equal deleted inserted replaced
5195:9c64f67c4683 5196:87d3df5d0e4e
1293 isearch-string nil t)) 1293 isearch-string nil t))
1294 (if isearch-success 1294 (if isearch-success
1295 (setq isearch-other-end 1295 (setq isearch-other-end
1296 (if isearch-forward (match-beginning 0) (match-end 0))))) 1296 (if isearch-forward (match-beginning 0) (match-end 0)))))
1297 1297
1298 (quit (isearch-unread (nth 3 (current-input-mode))) 1298 (quit (isearch-unread ?\C-g)
1299 (setq isearch-success nil)) 1299 (setq isearch-success nil))
1300 1300
1301 (invalid-regexp 1301 (invalid-regexp
1302 (setq isearch-invalid-regexp (car (cdr lossage))) 1302 (setq isearch-invalid-regexp (car (cdr lossage)))
1303 (if (string-match 1303 (if (string-match