diff options
author | Tom Willemsen | 2011-09-06 09:50:25 +0200 |
---|---|---|
committer | Tom Willemsen | 2011-09-06 09:50:25 +0200 |
commit | 27efcb33ece59af5c0f843f047758f2d31b7f55e (patch) | |
tree | 2c80015f9206f24b0926e3af6338f54741ebcf87 | |
parent | 27e9297a13437c88f5c0c037b998e28a730e2d98 (diff) | |
download | dotfiles-27efcb33ece59af5c0f843f047758f2d31b7f55e.tar.gz dotfiles-27efcb33ece59af5c0f843f047758f2d31b7f55e.zip |
EMACS: Ask for ispell dictionary name when writing a mail message
-rw-r--r-- | .emacs.d/init.el | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/.emacs.d/init.el b/.emacs.d/init.el index 3689d7c..eef5c4e 100644 --- a/.emacs.d/init.el +++ b/.emacs.d/init.el @@ -149,10 +149,12 @@ (setq-default bidi-display-reordering nil) ;;; Message -(add-hook 'message-mode-hook - (lambda () - (turn-on-auto-fill) - (turn-on-flyspell))) +(defun oni/message-mode-hook () + (turn-on-auto-fill) + (turn-on-flyspell) + (ispell-change-dictionary (read-string "New dictionary: "))) + +(add-hook 'message-mode-hook 'oni/message-mode-hook) ;;; Gnus (setq gnus-init-file "~/.emacs.d/gnus") |