From: Karl Heuer Date: Fri, 26 Mar 1999 18:02:24 +0000 (+0000) Subject: (indent-new-comment-line): Handle use at a point X-Git-Tag: emacs-20.4~427 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=af0e29d18ecbe9a4bc5fb930e01e47edf29edbd6;p=emacs.git (indent-new-comment-line): Handle use at a point after a comment-end. Handle multiple comments. --- diff --git a/lisp/simple.el b/lisp/simple.el index 92874f5f02e..eb4f7a3f6db 100644 --- a/lisp/simple.el +++ b/lisp/simple.el @@ -3219,9 +3219,13 @@ unless optional argument SOFT is non-nil." (if (not comment-multi-line) (save-excursion (if (and comment-start-skip - (let ((opoint (point))) + (let ((opoint (point)) + inside) (forward-line -1) - (re-search-forward comment-start-skip opoint t))) + ;; Determine (more or less) whether + ;; target position is inside a comment. + (while (and (setq inside (re-search-forward comment-start-skip opoint t)) + (not (setq inside (not (search-forward comment-end opoint t)))))))) ;; The old line is a comment. ;; Set WIN to the pos of the comment-start. ;; But if the comment is empty, look at preceding lines