]> git.eshelyaron.com Git - emacs.git/commitdiff
Remove a redundant let-binding from Ispell
authorBasil L. Contovounesios <contovob@tcd.ie>
Fri, 30 Jul 2021 10:30:53 +0000 (11:30 +0100)
committerBasil L. Contovounesios <contovob@tcd.ie>
Fri, 30 Jul 2021 10:30:53 +0000 (11:30 +0100)
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.

lisp/textmodes/ispell.el

index 0a82bf5a2d479503a5cac65975c786caaa6eab43..4c64531ea35c7fac86c4b8d6b11df77d041297a1 100644 (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