branch: master commit 32f6156ed03a152fbfe50eedee67488859b2cce7 Author: Artur Malabarba <bruce.connor...@gmail.com> Commit: Artur Malabarba <bruce.connor...@gmail.com>
Rename changed-list to -changed-list --- aggressive-indent.el | 18 +++++++++--------- 1 files changed, 9 insertions(+), 9 deletions(-) diff --git a/aggressive-indent.el b/aggressive-indent.el index 07bc7d5..4b3fe30 100644 --- a/aggressive-indent.el +++ b/aggressive-indent.el @@ -313,26 +313,26 @@ Like `aggressive-indent-indent-region-and-on', but wrapped in a (cl-letf (((symbol-function 'message) #'ignore)) (indent-region-and-on l r))))) -(defvar changed-list-right nil +(defvar -changed-list-right nil "List of right limit of regions changed in the last command loop.") -(defvar changed-list-left nil +(defvar -changed-list-left nil "List of left limit of regions changed in the last command loop.") (defun -indent-if-changed () "Indent any region that changed in the last command loop." (let ((inhibit-modification-hooks t)) - (when changed-list-left + (when -changed-list-left (-softly-indent-region-and-on - (apply #'min changed-list-left) - (apply #'max changed-list-right)) - (setq changed-list-left nil - changed-list-right nil)))) + (apply #'min -changed-list-left) + (apply #'max -changed-list-right)) + (setq -changed-list-left nil + -changed-list-right nil)))) (defun -keep-track-of-changes (l r &rest _) "Store the limits of each change that happens in the buffer." - (push l changed-list-left) - (push r changed-list-right)) + (push l -changed-list-left) + (push r -changed-list-right)) (defun -in-comment-p () "Return non-nil if point is inside a comment.