From 019644eeaa19ec86673d160f16dd2cc9510c2b59 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 24 Jul 1994 02:50:50 +0000 Subject: (add-log-current-defun): Skip doc string correctly even if it ends with line that starts space. --- lisp/add-log.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'lisp/add-log.el') diff --git a/lisp/add-log.el b/lisp/add-log.el index fdc546c9a91..3c570fa17d5 100644 --- a/lisp/add-log.el +++ b/lisp/add-log.el @@ -358,7 +358,9 @@ Has a preference of looking backwards." ;; 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)) -- cgit v1.2.3