[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/jinx 4feff0d8aa 5/5: Add primitive mouse support
From: |
ELPA Syncer |
Subject: |
[elpa] externals/jinx 4feff0d8aa 5/5: Add primitive mouse support |
Date: |
Sun, 26 Mar 2023 10:58:39 -0400 (EDT) |
branch: externals/jinx
commit 4feff0d8aa41ff486fa37a73a41087d9857dfd5a
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>
Add primitive mouse support
---
jinx.el | 2 ++
1 file changed, 2 insertions(+)
diff --git a/jinx.el b/jinx.el
index e5573da941..542acd5ec7 100644
--- a/jinx.el
+++ b/jinx.el
@@ -240,9 +240,11 @@ Predicate may return a position to skip forward.")
(put 'jinx 'evaporate t)
(put 'jinx 'face 'jinx-misspelled)
+(put 'jinx 'mouse-face '(jinx-misspelled jinx-highlight))
(put 'jinx 'modification-hooks (list #'jinx--overlay-modified))
(put 'jinx 'insert-in-front-hooks (list #'jinx--overlay-modified))
(put 'jinx 'insert-behind-hooks (list #'jinx--overlay-modified))
+(put 'jinx 'keymap (define-keymap "<mouse-1>" #'jinx-correct))
;;;; Predicates