Mercurial > emacs
changeset 13991:0297cd54b530
(isearch-abort, isearch-no-upper-case-p): Doc fix.
author | Karl Heuer <kwzh@gnu.org> |
---|---|
date | Thu, 04 Jan 1996 23:42:23 +0000 |
parents | 155a595b6083 |
children | 15305606a97a |
files | lisp/isearch.el |
diffstat | 1 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/isearch.el Thu Jan 04 23:42:04 1996 +0000 +++ b/lisp/isearch.el Thu Jan 04 23:42:23 1996 +0000 @@ -774,9 +774,9 @@ (signal 'quit nil)) ; and pass on quit signal (defun isearch-abort () - "Abort incremental search mode if searching is successful, signalling quit. + "Abort incremental search mode if searching is successful, signaling quit. Otherwise, revert to previous successful search and continue searching. -Use `isearch-exit' to quit without signalling." +Use `isearch-exit' to quit without signaling." (interactive) ;; (ding) signal instead below, if quitting (discard-input) @@ -1223,7 +1223,7 @@ ;; isearch-string stays the same t) ((or completion ; not nil, must be a string - (= 0 (length isearch-string))) ; shouldnt have to say this + (= 0 (length isearch-string))) ; shouldn't have to say this (if (equal completion isearch-string) ;; no extension? (if completion-auto-help (with-output-to-temp-buffer "*Isearch completions*" @@ -1419,7 +1419,7 @@ (defun isearch-no-upper-case-p (string regexp-flag) "Return t if there are no upper case chars in STRING. -If REGEXP-FLAG is non-nil, disregard letters preceeded by `\\' (but not `\\\\') +If REGEXP-FLAG is non-nil, disregard letters preceded by `\\' (but not `\\\\') since they have special meaning in a regexp." (let ((case-fold-search nil)) (not (string-match (if regexp-flag "\\(^\\|\\\\\\\\\\|[^\\]\\)[A-Z]"