aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuanma Barranquero2004-06-10 20:38:28 +0000
committerJuanma Barranquero2004-06-10 20:38:28 +0000
commit11a26e05696983a146197e8d88b7654ee1e15909 (patch)
treee1b30c95aa211c852d917ea5951cdc2b293d5501
parent61d244caf69d67c4fb7e22abe5b8f90c240340fb (diff)
downloademacs-11a26e05696983a146197e8d88b7654ee1e15909.tar.gz
emacs-11a26e05696983a146197e8d88b7654ee1e15909.zip
(comment-search-forward, comment-search-backward): Fix typos.
(comment-region): Doc fix.
-rw-r--r--lisp/newcomment.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/newcomment.el b/lisp/newcomment.el
index 924cf0ed8c4..2b9122a8eb9 100644
--- a/lisp/newcomment.el
+++ b/lisp/newcomment.el
@@ -356,7 +356,7 @@ in strings will not confuse Emacs.")
356 "Find a comment start between point and LIMIT. 356 "Find a comment start between point and LIMIT.
357Moves point to inside the comment and returns the position of the 357Moves point to inside the comment and returns the position of the
358comment-starter. If no comment is found, moves point to LIMIT 358comment-starter. If no comment is found, moves point to LIMIT
359and raises an error or returns nil of NOERROR is non-nil." 359and raises an error or returns nil if NOERROR is non-nil."
360 (if (not comment-use-syntax) 360 (if (not comment-use-syntax)
361 (if (re-search-forward comment-start-skip limit noerror) 361 (if (re-search-forward comment-start-skip limit noerror)
362 (or (match-end 1) (match-beginning 0)) 362 (or (match-end 1) (match-beginning 0))
@@ -392,7 +392,7 @@ and raises an error or returns nil of NOERROR is non-nil."
392 "Find a comment start between LIMIT and point. 392 "Find a comment start between LIMIT and point.
393Moves point to inside the comment and returns the position of the 393Moves point to inside the comment and returns the position of the
394comment-starter. If no comment is found, moves point to LIMIT 394comment-starter. If no comment is found, moves point to LIMIT
395and raises an error or returns nil of NOERROR is non-nil." 395and raises an error or returns nil if NOERROR is non-nil."
396 ;; FIXME: If a comment-start appears inside a comment, we may erroneously 396 ;; FIXME: If a comment-start appears inside a comment, we may erroneously
397 ;; stop there. This can be rather bad in general, but since 397 ;; stop there. This can be rather bad in general, but since
398 ;; comment-search-backward is only used to find the comment-column (in 398 ;; comment-search-backward is only used to find the comment-column (in
@@ -955,7 +955,7 @@ rather than at left margin."
955(defun comment-region (beg end &optional arg) 955(defun comment-region (beg end &optional arg)
956 "Comment or uncomment each line in the region. 956 "Comment or uncomment each line in the region.
957With just \\[universal-argument] prefix arg, uncomment each line in region BEG .. END. 957With just \\[universal-argument] prefix arg, uncomment each line in region BEG .. END.
958Numeric prefix arg ARG means use ARG comment characters. 958Numeric prefix ARG means use ARG comment characters.
959If ARG is negative, delete that many comment characters instead. 959If ARG is negative, delete that many comment characters instead.
960By default, comments start at the left margin, are terminated on each line, 960By default, comments start at the left margin, are terminated on each line,
961even for syntax in which newline does not end the comment and blank lines 961even for syntax in which newline does not end the comment and blank lines