only show trailing whitespace in text/prog modes

[dotemacs] / lisp / my-other-modes.el

diff --git a/lisp/my-other-modes.el b/lisp/my-other-modes.el
index 778093cab732846e1f9a13310ba9839d41bb0f1e..c8baa0329a8b1c59e8941a507290e5cf7703de47 100644 (file)
--- a/lisp/my-other-modes.el
+++ b/lisp/my-other-modes.el
@@ -36,6 +36,10 @@
 (require 'saveplace)
 (setq-default save-place t)
 
+(dolist (hook '(prog-mode-hook text-mode-hook))
+  (add-hook hook (lambda ()
+                   (setq show-trailing-whitespace t))))
+
 (setq undo-limit 10000000)
 (setq undo-strong-limit undo-limit)