branch: master
commit b957752b12ac10ef0093756735b24754b131bfd0
Author: Artur Malabarba <[email protected]>
Commit: Artur Malabarba <[email protected]>
Don't indent if the user is starting to type a comment. Fix #51
---
aggressive-indent.el | 10 +++++++++-
1 files changed, 9 insertions(+), 1 deletions(-)
diff --git a/aggressive-indent.el b/aggressive-indent.el
index b6181fb..dfa431a 100644
--- a/aggressive-indent.el
+++ b/aggressive-indent.el
@@ -173,7 +173,15 @@ commands will NOT be followed by a re-indent."
buffer-read-only
(null (buffer-modified-p))
(and (boundp 'smerge-mode) smerge-mode)
- (string-match "\\`[[:blank:]]*\n?\\'" (or (thing-at-point 'line) ""))
+ (let ((line (thing-at-point 'line)))
+ (when (stringp line)
+ (or (string-match "\\`[[:blank:]]*\n?\\'" line)
+ ;; If the user is starting to type a comment.
+ (and (stringp comment-start)
+ (string-match (concat "\\`[[:blank:]]*"
+ (substring comment-start 0 1)
+ "[[:blank:]]*$")
+ line)))))
(let ((sp (syntax-ppss)))
;; Comments.
(or (and (not aggressive-indent-comments-too) (elt sp 4))
