enable whitespace-mode in modes derived from text-mode

This commit is contained in:
Bozhidar Batsov 2013-01-05 10:38:12 +02:00
parent 26259d90b8
commit f242489747
2 changed files with 8 additions and 5 deletions

View file

@ -218,8 +218,14 @@
(when (and prelude-flyspell (executable-find ispell-program-name))
(flyspell-mode +1)))
(add-hook 'message-mode-hook 'prelude-enable-flyspell)
(defun prelude-enable-whitespace ()
(when prelude-whitespace
;; keep the whitespace decent all the time (in this buffer)
(add-hook 'before-save-hook 'whitespace-cleanup nil t)
(whitespace-mode +1)))
(add-hook 'text-mode-hook 'prelude-enable-flyspell)
(add-hook 'text-mode-hook 'prelude-enable-whitespace)
;; enable narrowing commands
(put 'narrow-to-region 'disabled nil)

View file

@ -116,10 +116,7 @@
(flyspell-prog-mode))
(when prelude-guru
(guru-mode +1))
(when prelude-whitespace
;; keep the whitespace decent all the time (in this buffer)
(add-hook 'before-save-hook 'whitespace-cleanup nil t)
(whitespace-mode +1))
(prelude-enable-whitespace)
(flycheck-mode +1)
(prelude-local-comment-auto-fill)
(prelude-add-watchwords))