From 0dbc4a697afb2a1e409909289f608fd4da875c24 Mon Sep 17 00:00:00 2001 From: Mark Diekhans Date: Sun, 24 Feb 2019 10:27:09 -0800 Subject: [PATCH] Improve ispell.el diagnostics if Hunspell dictionaries aren't found * lisp/textmodes/ispell.el (ispell-set-spellchecker-params): Set ispell-last-program-name only at the end, so as to produce useful diagnostics when Hunspell dictionaries are not found. (Bug#34640) Copyright-paperwork-exempt: yes --- lisp/textmodes/ispell.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index 35dae7bc432..6553a2799bb 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el @@ -1273,7 +1273,6 @@ aspell is used along with Emacs).") (defun ispell-set-spellchecker-params () "Initialize some spellchecker parameters when changed or first used." (unless (eq ispell-last-program-name ispell-program-name) - (setq ispell-last-program-name ispell-program-name) (ispell-kill-ispell t) (if (and (condition-case () (progn @@ -1388,7 +1387,8 @@ aspell is used along with Emacs).") (nth 7 adict))) adict) tmp-dicts-alist :test #'equal)) - (setq ispell-dictionary-alist tmp-dicts-alist)))) + (setq ispell-dictionary-alist tmp-dicts-alist))) + (setq ispell-last-program-name ispell-program-name)) (defun ispell-valid-dictionary-list () "Return a list of valid dictionaries. -- 2.39.2