From 37ea71eff642f5b59edf676ba28a0b4107a6691b Mon Sep 17 00:00:00 2001 From: Henrik Lissner Date: Fri, 4 Mar 2016 18:26:25 -0500 Subject: [PATCH] Fix off-by-one cursor issue with indent-new-comment-line --- core/defuns/defuns-whitespace.el | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/core/defuns/defuns-whitespace.el b/core/defuns/defuns-whitespace.el index 61d033963..ae95f2144 100644 --- a/core/defuns/defuns-whitespace.el +++ b/core/defuns/defuns-whitespace.el @@ -147,7 +147,13 @@ spaces on either side of the point if so. Resorts to (newline-and-indent) (insert "* ") (indent-according-to-mode)) - (t (indent-new-comment-line)))) + (t + ;; Fix an off-by-one cursor-positioning issue + ;; with `indent-new-comment-line' + (let ((col (save-excursion (comment-beginning) (current-column)))) + (indent-new-comment-line) + (unless (= col (current-column)) + (insert " ")))))) (t (newline nil t) (indent-according-to-mode))))