From: Reuben Thomas <rrt@sc3d.org>
Date: Mon, 2 Nov 2020 21:41:05 +0000 (+0000)
Subject: Simplify ispell-check-version’s use of -vv flag
X-Git-Tag: emacs-28.0.90~5263
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=640b41cd9b7e1196eea51a5664a3756916e37715;p=emacs.git

Simplify ispell-check-version’s use of -vv flag

* lisp/textmodes/ispell.el (ispell-check-version): All supported spell
checker programs accept -vv, including aspell for many years, so use
it.
---

diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index da518b10749..60415b02b8b 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -684,13 +684,11 @@ Otherwise returns the library directory name, if that is defined."
     (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