diff options
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/newcomment.el | 8 |
2 files changed, 11 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 30a59aa8912..023e11a9415 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2013-06-18 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * newcomment.el (comment-search-forward, comment-search-backward): | ||
| 4 | Doc fix. (Bug#14376) | ||
| 5 | |||
| 1 | 2013-06-18 Juanma Barranquero <lekktu@gmail.com> | 6 | 2013-06-18 Juanma Barranquero <lekktu@gmail.com> |
| 2 | 7 | ||
| 3 | * face-remap.el (buffer-face-toggle): Fix typo in docstring. | 8 | * face-remap.el (buffer-face-toggle): Fix typo in docstring. |
diff --git a/lisp/newcomment.el b/lisp/newcomment.el index bcb5f721ae8..19a06bfe8e5 100644 --- a/lisp/newcomment.el +++ b/lisp/newcomment.el | |||
| @@ -446,7 +446,9 @@ in strings will not confuse Emacs.") | |||
| 446 | "Find a comment start between point and LIMIT. | 446 | "Find a comment start between point and LIMIT. |
| 447 | Moves point to inside the comment and returns the position of the | 447 | Moves point to inside the comment and returns the position of the |
| 448 | comment-starter. If no comment is found, moves point to LIMIT | 448 | comment-starter. If no comment is found, moves point to LIMIT |
| 449 | and raises an error or returns nil if NOERROR is non-nil." | 449 | and raises an error or returns nil if NOERROR is non-nil. |
| 450 | |||
| 451 | Ensure that `comment-normalize-vars' has been called before you use this." | ||
| 450 | (if (not comment-use-syntax) | 452 | (if (not comment-use-syntax) |
| 451 | (if (re-search-forward comment-start-skip limit noerror) | 453 | (if (re-search-forward comment-start-skip limit noerror) |
| 452 | (or (match-end 1) (match-beginning 0)) | 454 | (or (match-end 1) (match-beginning 0)) |
| @@ -484,7 +486,9 @@ and raises an error or returns nil if NOERROR is non-nil." | |||
| 484 | "Find a comment start between LIMIT and point. | 486 | "Find a comment start between LIMIT and point. |
| 485 | Moves point to inside the comment and returns the position of the | 487 | Moves point to inside the comment and returns the position of the |
| 486 | comment-starter. If no comment is found, moves point to LIMIT | 488 | comment-starter. If no comment is found, moves point to LIMIT |
| 487 | and raises an error or returns nil if NOERROR is non-nil." | 489 | and raises an error or returns nil if NOERROR is non-nil. |
| 490 | |||
| 491 | Ensure that `comment-normalize-vars' has been called before you use this." | ||
| 488 | ;; FIXME: If a comment-start appears inside a comment, we may erroneously | 492 | ;; FIXME: If a comment-start appears inside a comment, we may erroneously |
| 489 | ;; stop there. This can be rather bad in general, but since | 493 | ;; stop there. This can be rather bad in general, but since |
| 490 | ;; comment-search-backward is only used to find the comment-column (in | 494 | ;; comment-search-backward is only used to find the comment-column (in |