]> code.delx.au - gnu-emacs-elpa/commitdiff
Rename changed-list to -changed-list
authorArtur Malabarba <bruce.connor.am@gmail.com>
Wed, 29 Oct 2014 19:07:05 +0000 (19:07 +0000)
committerArtur Malabarba <bruce.connor.am@gmail.com>
Wed, 29 Oct 2014 19:07:05 +0000 (19:07 +0000)
aggressive-indent.el

index 07bc7d511cdde7125058faf2d945d90e2e65f7af..4b3fe309eb236bf8699d643a1e911f07509d35e9 100644 (file)
@@ -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.