From: Karl Heuer <kwzh@gnu.org>
Date: Thu, 4 Jan 1996 23:42:23 +0000 (+0000)
Subject: (isearch-abort, isearch-no-upper-case-p): Doc fix.
X-Git-Tag: emacs-19.34~1869
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b7852303b81d47d676800347fd68fcc791eefe1c;p=emacs.git

(isearch-abort, isearch-no-upper-case-p): Doc fix.
---

diff --git a/lisp/isearch.el b/lisp/isearch.el
index 3beec1835aa..5e5d55acba0 100644
--- a/lisp/isearch.el
+++ b/lisp/isearch.el
@@ -774,9 +774,9 @@ If first char entered is \\[isearch-yank-word], then do word search instead."
   (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 @@ If you want to search for just a space, type C-q SPC."
       ;; 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 @@ If there is no completion possible, say so and continue searching."
 
 (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]"