Remove a redundant let-binding from Ispell

Recent optimizer changes revealed a case-fold-search binding in
Ispell that was made redundant in the revision of 2020-11-03
"Simplify ispell-check-version’s use of -vv flag".

* lisp/textmodes/ispell.el (ispell-check-version): Remove no-op
binding of case-fold-search.
This commit is contained in:
Basil L. Contovounesios 2021-07-30 11:30:53 +01:00
parent 5f65b67dac
commit 97894b07c2

View file

@ -649,11 +649,7 @@ Otherwise returns the library directory name, if that is defined."
result libvar status ispell-program-version)
(with-temp-buffer
(setq status (ispell-call-process
ispell-program-name nil t nil
(let ((case-fold-search
(memq system-type '(ms-dos windows-nt))))
"-vv")))
(setq status (ispell-call-process ispell-program-name nil t nil "-vv"))
(goto-char (point-min))
(if interactivep
;; Report version information of ispell