[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] master 0dbc4a6: Improve ispell.el diagnostics if Hunspell
From: |
Eli Zaretskii |
Subject: |
[Emacs-diffs] master 0dbc4a6: Improve ispell.el diagnostics if Hunspell dictionaries aren't found |
Date: |
Fri, 8 Mar 2019 04:19:30 -0500 (EST) |
branch: master
commit 0dbc4a697afb2a1e409909289f608fd4da875c24
Author: Mark Diekhans <address@hidden>
Commit: Eli Zaretskii <address@hidden>
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 35dae7b..6553a27 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.
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] master 0dbc4a6: Improve ispell.el diagnostics if Hunspell dictionaries aren't found,
Eli Zaretskii <=