Mercurial > emacs
changeset 8313:589abdc989e1
(add-log-current-defun): Skip doc string
correctly even if it ends with line that starts space.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Sun, 24 Jul 1994 02:50:50 +0000 |
| parents | ff0139dfba53 |
| children | e0f95bf90681 |
| files | lisp/add-log.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/add-log.el Sun Jul 24 01:20:24 1994 +0000 +++ b/lisp/add-log.el Sun Jul 24 02:50:50 1994 +0000 @@ -358,7 +358,9 @@ ;; or the DEFUN macro used by the C library. (if (condition-case nil (and (save-excursion - (forward-line 1) + (end-of-line) + (while (= (preceding-char) ?\\) + (end-of-line 2)) (backward-sexp 1) (beginning-of-line) (setq tem (point))