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")