diff options
| author | Juanma Barranquero | 2004-06-10 20:38:28 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2004-06-10 20:38:28 +0000 |
| commit | 11a26e05696983a146197e8d88b7654ee1e15909 (patch) | |
| tree | e1b30c95aa211c852d917ea5951cdc2b293d5501 | |
| parent | 61d244caf69d67c4fb7e22abe5b8f90c240340fb (diff) | |
| download | emacs-11a26e05696983a146197e8d88b7654ee1e15909.tar.gz emacs-11a26e05696983a146197e8d88b7654ee1e15909.zip | |
(comment-search-forward, comment-search-backward): Fix typos.
(comment-region): Doc fix.
| -rw-r--r-- | lisp/newcomment.el | 6 |
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. |
| 357 | Moves point to inside the comment and returns the position of the | 357 | Moves point to inside the comment and returns the position of the |
| 358 | comment-starter. If no comment is found, moves point to LIMIT | 358 | comment-starter. If no comment is found, moves point to LIMIT |
| 359 | and raises an error or returns nil of NOERROR is non-nil." | 359 | and 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. |
| 393 | Moves point to inside the comment and returns the position of the | 393 | Moves point to inside the comment and returns the position of the |
| 394 | comment-starter. If no comment is found, moves point to LIMIT | 394 | comment-starter. If no comment is found, moves point to LIMIT |
| 395 | and raises an error or returns nil of NOERROR is non-nil." | 395 | and 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. |
| 957 | With just \\[universal-argument] prefix arg, uncomment each line in region BEG .. END. | 957 | With just \\[universal-argument] prefix arg, uncomment each line in region BEG .. END. |
| 958 | Numeric prefix arg ARG means use ARG comment characters. | 958 | Numeric prefix ARG means use ARG comment characters. |
| 959 | If ARG is negative, delete that many comment characters instead. | 959 | If ARG is negative, delete that many comment characters instead. |
| 960 | By default, comments start at the left margin, are terminated on each line, | 960 | By default, comments start at the left margin, are terminated on each line, |
| 961 | even for syntax in which newline does not end the comment and blank lines | 961 | even for syntax in which newline does not end the comment and blank lines |