about summary refs log tree commit diff stats
path: root/.emacs.d/lisp/init-ui.el
diff options
context:
space:
mode:
authorDavid Morgan <djm_uk@protonmail.com>2022-10-25 16:37:07 +0100
committerDavid Morgan <djm_uk@protonmail.com>2022-10-25 16:37:07 +0100
commitb7b89435c62c1256bce2c932207d233ca517d7bf (patch)
tree8e2366e54dec6b143c4ef57079d9afbcc068c44f /.emacs.d/lisp/init-ui.el
parent1ab1ff47ad8c9b6dd32ec227024b6b2980b0c4a7 (diff)
downloaddotfiles-b7b89435c62c1256bce2c932207d233ca517d7bf.tar.gz
Turn off whitespace-mode in mode modes
Diffstat (limited to '.emacs.d/lisp/init-ui.el')
-rw-r--r--.emacs.d/lisp/init-ui.el11
1 files changed, 6 insertions, 5 deletions
diff --git a/.emacs.d/lisp/init-ui.el b/.emacs.d/lisp/init-ui.el
index c92e3cb..ad900ad 100644
--- a/.emacs.d/lisp/init-ui.el
+++ b/.emacs.d/lisp/init-ui.el
@@ -131,13 +131,14 @@
   :custom
   (whitespace-line-column 120)
   (whitespace-style '(face tabs empty trailing lines-tail))
+  :config
+  (defun turn-off-whitespace-mode ()
+    (whitespace-mode -1))
+  (defvar-local whitespace-disabled-modes '(cider-repl-mode ielm-mode vterm-mode eshell-mode shell-mode term-mode ansi-term-mode))
+  (dolist (mode whitespace-disabled-modes)
+    (add-hook (intern (concat (symbol-name mode) "-hook")) #'turn-off-whitespace-mode))
   :hook
   (text-mode . (lambda () (whitespace-mode +1)))
-  (prog-mode . (lambda () (whitespace-mode +1)))
-  (cider-repl-mode . (lambda () (whitespace-mode -1)))
-  (ielm-mode . (lambda () (whitespace-mode -1)))
-  (vterm-mode . (lambda () (whitespace-mode -1)))
-  (eshell-mode . (lambda () (whitespace-mode -1))))
 
 (use-package volatile-highlights
   :defer 10