emacs: Shut up complaints about .emacs.d/init.el: Warning: (lambda nil \.\.\.) quoted with ' rather than with #'

1 files changed, 51 insertions, 51 deletions

diff --git a/.config/emacs/init.el b/.config/emacs/init.el
index 0dde967..87ae351 100644
--- a/.config/emacs/init.el
+++ b/.config/emacs/init.el
@@ -83,18 +83,18 @@
   :config (progn
             ;; Modus makes MMM regions almost impossible to see
             (add-hook 'modus-themes-after-load-theme-hook
-                      '(lambda ()
-                         (modus-themes-with-colors
-                           (custom-set-faces
-                            `(mmm-cleanup-submode-face     ((,class :background ,yellow-refine-bg)))
-                            `(mmm-code-submode-face        ((,class :background ,bg-active)))
-                            `(mmm-comment-submode-face     ((,class :background ,blue-refine-bg)))
-                            `(mmm-declaration-submode-face ((,class :background ,cyan-refine-bg)))
-                            `(mmm-default-submode-face     ((,class :background ,bg-alt)))
-                            `(mmm-init-submode-face        ((,class :background ,magenta-refine-bg)))
-                            `(mmm-output-submode-face      ((,class :background ,red-refine-bg)))
-                            `(mmm-special-submode-face     ((,class :background ,green-refine-bg)))))
-                         ))
+                      (lambda ()
+                        (modus-themes-with-colors
+                          (custom-set-faces
+                           `(mmm-cleanup-submode-face     ((,class :background ,yellow-refine-bg)))
+                           `(mmm-code-submode-face        ((,class :background ,bg-active)))
+                           `(mmm-comment-submode-face     ((,class :background ,blue-refine-bg)))
+                           `(mmm-declaration-submode-face ((,class :background ,cyan-refine-bg)))
+                           `(mmm-default-submode-face     ((,class :background ,bg-alt)))
+                           `(mmm-init-submode-face        ((,class :background ,magenta-refine-bg)))
+                           `(mmm-output-submode-face      ((,class :background ,red-refine-bg)))
+                           `(mmm-special-submode-face     ((,class :background ,green-refine-bg)))))
+                        ))
             ;; Load the theme.  Use this function instead of
             ;; load-theme in order to get the above hook.
             (modus-themes-load-vivendi)
@@ -159,9 +159,9 @@
 (use-package graphviz-dot-mode
   :mode ("\\.dot\\'" "\\.gv\\'")
   :config (add-hook 'graphviz-dot-mode-hook
-                    '(lambda ()
-                       (set (make-local-variable 'graphviz-dot-auto-indent-on-semi) nil)
-                       )))
+                    (lambda ()
+                      (set (make-local-variable 'graphviz-dot-auto-indent-on-semi) nil)
+                      )))
 (use-package jq-mode
   :mode "\\.jq\\'"
   :interpreter "jq")
@@ -189,10 +189,10 @@
          "\\.cson\\'")
   :interpreter "coffee"
   :config (add-hook 'coffee-mode-hook
-                    '(lambda ()
-                       (set (make-local-variable 'tab-width) 2)
-                       (set (make-local-variable 'indent-tabs-mode) nil)
-                       )))
+                    (lambda ()
+                      (set (make-local-variable 'tab-width) 2)
+                      (set (make-local-variable 'indent-tabs-mode) nil)
+                      )))
 (use-package haml-mode         :mode "\\.haml\\'")
 (use-package less-css-mode     :mode "\\.less\\'")
 (use-package php-mode
@@ -293,9 +293,9 @@ sh-script.el is broken."
 (when (fboundp 'xterm-mouse-mode)
   (xterm-mouse-mode 1)
   (add-hook 'after-make-frame-functions
-            '(lambda (frame)
-               (if xterm-mouse-mode (xterm-mouse-mode 1))
-               )))
+            (lambda (frame)
+              (if xterm-mouse-mode (xterm-mouse-mode 1))
+              )))
 
 ;; Make TRAMP obey ~/.ssh/config for ControlMaster.  For some reason,
 ;; customize doesn't correctly set this.
@@ -385,47 +385,47 @@ sh-script.el is broken."
 (add-hook 'text-mode-hook 'turn-on-auto-fill)
 
 (add-hook 'lisp-mode-hook
-          '(lambda ()
-             (set (make-local-variable 'indent-tabs-mode) nil)
-             ))
+          (lambda ()
+            (set (make-local-variable 'indent-tabs-mode) nil)
+            ))
 
 (add-hook 'emacs-lisp-mode-hook
-          '(lambda ()
-             (set (make-local-variable 'indent-tabs-mode) nil)
-             ))
+          (lambda ()
+            (set (make-local-variable 'indent-tabs-mode) nil)
+            ))
 
 (add-hook 'term-mode-hook
-          '(lambda ()
-             (auto-fill-mode -1)
-             (setq term-prompt-regexp "^[^#$%>\n]*[#$%>] *")
-             (set (make-local-variable 'mouse-yank-at-point) t)
-             (setq tab-width 8 )
-             (setq truncate-lines nil)
-             (set (make-local-variable 'autopair-dont-activate) t) ;; Don't let autopair break ansi-term
-             ))
+          (lambda ()
+            (auto-fill-mode -1)
+            (setq term-prompt-regexp "^[^#$%>\n]*[#$%>] *")
+            (set (make-local-variable 'mouse-yank-at-point) t)
+            (setq tab-width 8 )
+            (setq truncate-lines nil)
+            (set (make-local-variable 'autopair-dont-activate) t) ;; Don't let autopair break ansi-term
+            ))
 
 (add-hook 'ruby-mode-hook
-          '(lambda ()
-             (set (make-local-variable 'indent-tabs-mode) t)
-             (set (make-local-variable 'ruby-indent-level) 4)
-             (set (make-local-variable 'tab-width) 4)
-             ))
+          (lambda ()
+            (set (make-local-variable 'indent-tabs-mode) t)
+            (set (make-local-variable 'ruby-indent-level) 4)
+            (set (make-local-variable 'tab-width) 4)
+            ))
 
 (add-hook 'tex-mode-hook
-          '(lambda ()
-             (set (make-local-variable 'tab-always-indent) nil)
-             (set (make-local-variable 'indent-tabs-mode) t)
-             ))
+          (lambda ()
+            (set (make-local-variable 'tab-always-indent) nil)
+            (set (make-local-variable 'indent-tabs-mode) t)
+            ))
 
 (add-hook 'sh-mode-hook
-          '(lambda ()
-             (sh-electric-here-document-mode 0)
-             ))
+          (lambda ()
+            (sh-electric-here-document-mode 0)
+            ))
 
 (add-hook 'erc-mode-hook
-          '(lambda ()
-             (define-key erc-mode-map (kbd "C-c C-u") 'erc-cmd-QUERY)
-             ))
+          (lambda ()
+            (define-key erc-mode-map (kbd "C-c C-u") 'erc-cmd-QUERY)
+            ))
 
 (add-hook 'js-mode-hook
           (lambda ()