[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/jit-spell 6b960c0403 3/3: Fix completion predicate
From: |
ELPA Syncer |
Subject: |
[elpa] externals/jit-spell 6b960c0403 3/3: Fix completion predicate |
Date: |
Sat, 4 Mar 2023 16:58:02 -0500 (EST) |
branch: externals/jit-spell
commit 6b960c04037be4b372f6520657fc09d870214edd
Author: Augusto Stoffel <arstoffel@gmail.com>
Commit: Augusto Stoffel <arstoffel@gmail.com>
Fix completion predicate
---
jit-spell.el | 9 +++++++--
1 file changed, 7 insertions(+), 2 deletions(-)
diff --git a/jit-spell.el b/jit-spell.el
index 87d61df153..4e65f8eb56 100644
--- a/jit-spell.el
+++ b/jit-spell.el
@@ -502,11 +502,16 @@ again moves to the next misspelling."
(jit-spell--unfontify))
;; Don't litter M-x
-(put 'jit-spell--context-menu 'completion-predicate #'ignore)
+(dolist (sym '(jit-spell--context-menu
+ jit-spell-correct-word--next))
+ (put sym 'completion-predicate #'ignore))
+
(dolist (sym '(jit-spell-change-dictionary
jit-spell-correct-word
jit-spell-accept-word))
- (put sym 'completion-predicate (lambda (&rest _) jit-spell-mode)))
+ (put sym 'completion-predicate (lambda (_ buffer)
+ (buffer-local-value 'jit-spell-mode
+ buffer))))
(provide 'jit-spell)