]> code.delx.au - gnu-emacs-elpa/commitdiff
fix indent
authorSean Whitton <spwhitton@spwhitton.name>
Sat, 12 Dec 2015 20:41:36 +0000 (13:41 -0700)
committerSean Whitton <spwhitton@spwhitton.name>
Sat, 12 Dec 2015 20:41:36 +0000 (13:41 -0700)
aggressive-indent.el

index ab6d0c7e8ec48e898c4ae05d740cfa6dfa6f3a94..faf5b115212f497ba142b856d1d7ea262a55ccc5 100644 (file)
@@ -382,15 +382,15 @@ or messages."
 (define-minor-mode aggressive-indent-mode
   nil nil " =>"
   `((,(kbd "C-c C-q") . aggressive-indent-indent-defun)
-   ([backspace]
-    menu-item "maybe-delete-indentation" ignore :filter
-    (lambda (&optional _)
-      (when (and (looking-back "^[[:blank:]]+")
-                 ;; Wherever we don't want to indent, we probably also
-                 ;; want the default backspace behavior.
-                 (not (run-hook-wrapped 'aggressive-indent--internal-dont-indent-if #'eval))
-                 (not (aggressive-indent--run-user-hooks)))
-        #'delete-indentation))))
+    ([backspace]
+     menu-item "maybe-delete-indentation" ignore :filter
+     (lambda (&optional _)
+       (when (and (looking-back "^[[:blank:]]+")
+                  ;; Wherever we don't want to indent, we probably also
+                  ;; want the default backspace behavior.
+                  (not (run-hook-wrapped 'aggressive-indent--internal-dont-indent-if #'eval))
+                  (not (aggressive-indent--run-user-hooks)))
+         #'delete-indentation))))
   (if aggressive-indent-mode
       (if (and global-aggressive-indent-mode
                (or (cl-member-if #'derived-mode-p aggressive-indent-excluded-modes)