]> code.delx.au - gnu-emacs-elpa/commitdiff
quoting fix
authorSean Whitton <spwhitton@spwhitton.name>
Sat, 12 Dec 2015 17:40:57 +0000 (10:40 -0700)
committerSean Whitton <spwhitton@spwhitton.name>
Sat, 12 Dec 2015 17:40:57 +0000 (10:40 -0700)
aggressive-indent.el

index b958853606bd07057a295a67476fc3dbc90c4194..ab6d0c7e8ec48e898c4ae05d740cfa6dfa6f3a94 100644 (file)
@@ -381,16 +381,16 @@ or messages."
 ;;;###autoload
 (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))))
+  `((,(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))))
   (if aggressive-indent-mode
       (if (and global-aggressive-indent-mode
                (or (cl-member-if #'derived-mode-p aggressive-indent-excluded-modes)