From c83ffcbe1ba950b9270bcde56d117c2c50e35112 Mon Sep 17 00:00:00 2001 From: Reuben Thomas Date: Mon, 2 Nov 2020 21:41:05 +0000 Subject: [PATCH 1/3] =?UTF-8?q?Simplify=20ispell-check-version=E2=80=99s?= =?UTF-8?q?=20use=20of=20-vv=20flag?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit * lisp/textmodes/ispell.el (ispell-check-version): All supported spell checker programs accept -vv, including aspell for many years, so use it. --- lisp/textmodes/ispell.el | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el index da3c3f4d6f..9e56923d60 100644 --- a/lisp/textmodes/ispell.el +++ b/lisp/textmodes/ispell.el @@ -684,13 +684,11 @@ ispell-check-version (with-temp-buffer (setq status (ispell-call-process ispell-program-name nil t nil - ;; aspell doesn't accept the -vv switch. (let ((case-fold-search (memq system-type '(ms-dos windows-nt))) (speller (file-name-nondirectory ispell-program-name))) - ;; Assume anything that isn't `aspell' is Ispell. - (if (string-match "\\`aspell" speller) "-v" "-vv")))) + "-vv"))) (goto-char (point-min)) (if interactivep ;; Report version information of ispell -- 2.25.1