[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 97894b0: Remove a redundant let-binding from Ispell
From: |
Basil L. Contovounesios |
Subject: |
master 97894b0: Remove a redundant let-binding from Ispell |
Date: |
Fri, 30 Jul 2021 06:45:06 -0400 (EDT) |
branch: master
commit 97894b07c2a6dea48f048e0d0c19d5717912cdf6
Author: Basil L. Contovounesios <contovob@tcd.ie>
Commit: Basil L. Contovounesios <contovob@tcd.ie>
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.
---
lisp/textmodes/ispell.el | 6 +-----
1 file changed, 1 insertion(+), 5 deletions(-)
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index 0a82bf5..4c64531 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -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
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 97894b0: Remove a redundant let-binding from Ispell,
Basil L. Contovounesios <=