diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el

index 65f61644b6..254c3e6a82 100644

--- a/lisp/textmodes/ispell.el

+++ b/lisp/textmodes/ispell.el

@@ -197,14 +197,11 @@ ispell-choices-win-default-height

   :type 'integer

   :group 'ispell)

-;; XXX Add enchant to this list once enchant >= 2.1.0 is widespread.

-;; Before that, adding it is useless, as if it is found, it will just

-;; cause an error; and one of the other spelling engines below is

-;; almost certainly installed in any case, for enchant to use.

 (defcustom ispell-program-name

-  (or (executable-find "aspell")

-      (executable-find "ispell")

+  (or (executable-find "enchant-2")

       (executable-find "hunspell")

+      (executable-find "aspell")

+      (executable-find "ispell")

       "ispell")

   "Program invoked by \\[ispell-word] and \\[ispell-region] commands."

   :type 'string