--- ispell.el.orig	2013-11-15 22:40:50.922512372 +0900
+++ ispell.el	2013-11-15 22:41:25.509015578 +0900
@@ -1181,6 +1181,7 @@
 (defun ispell-parse-hunspell-affix-file (dict-key)
   "Parse hunspell affix file to extract parameters for `DICT-KEY'.
 Return a list in `ispell-dictionary-alist' format."
+  (unless dict-key (setq dict-key "english"))
   (let ((affix-file (cadr (assoc dict-key ispell-hunspell-dict-paths-alist))))
     (unless affix-file
       (error "ispell-phaf: No matching entry for %s.\n" dict-key))