[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/jinx 416b76abd9 2/2: jinx--word-valid-p: Simplify
From: |
ELPA Syncer |
Subject: |
[elpa] externals/jinx 416b76abd9 2/2: jinx--word-valid-p: Simplify |
Date: |
Sun, 30 Jul 2023 09:58:06 -0400 (EDT) |
branch: externals/jinx
commit 416b76abd9c3155797329c2204cf50e535ad566c
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
jinx--word-valid-p: Simplify
---
jinx.el | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/jinx.el b/jinx.el
index 02b1ec64d2..7f018b5ad6 100644
--- a/jinx.el
+++ b/jinx.el
@@ -359,8 +359,7 @@ Predicate may return a position to skip forward.")
(and (string-match-p "\\`[[:upper:]][[:lower:]]+\\'" word)
(cl-loop
for w in jinx--session-words
- thereis (and (eq t (compare-strings word 0 1 w 0 1 t))
- (eq t (compare-strings word 1 nil w 1 nil nil))
+ thereis (and (string-equal-ignore-case word w)
(string-match-p "\\`[[:lower:]]+\\'" w))))
(cl-loop for dict in jinx--dicts
thereis (jinx--mod-check dict word)))))