[elpa] externals/jinx 28a78cec74: Add jinx-repeat-map (Fix #60)

[ELPA Syncer]

branch: externals/jinx
commit 28a78cec743ee656029b129efabacbfd9e669ab3
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Add jinx-repeat-map (Fix #60)
---
 CHANGELOG.org |  8 +++++---
 jinx.el       | 15 ++++++++++++---
 2 files changed, 17 insertions(+), 6 deletions(-)

diff --git a/CHANGELOG.org b/CHANGELOG.org
index d0ea95f238..9420e0dadb 100644
--- a/CHANGELOG.org
+++ b/CHANGELOG.org
@@ -4,12 +4,14 @@
 
 * Development
 
+- 🪄 Make sure that Emojis are not marked as misspelled 🧙🏼‍♀️.
 - Rename =jinx-correct-next/previous= to =jinx-next/previous=. The commands 
can be
   used outside the minibuffer.
-- Bind =M-n= and =M-p= to =jinx-next/previous= in =jinx-misspelled-map=.
-- Bind =M-$= to =jinx-correct= in the =jinx-misspelled-map=.
-- 🪄 Make sure that Emojis are not marked as misspelled 🧙🏼‍♀️.
+- Bind =M-n= and =M-p= to =jinx-next/previous= in =jinx-overlay-map=.
+- Bind =M-$= to =jinx-correct= in the =jinx-overlay-map=.
+- Add =jinx-repeat-map=.
 - Rename category of Jinx overlays to =jinx-overlay=.
+- Rename =jinx-misspelled-map= to =jinx-overlay-map=.
 
 * Version 0.8 (2023-04-28)
 
diff --git a/jinx.el b/jinx.el
index c0ec85d0dd..a3bb04b0ab 100644
--- a/jinx.el
+++ b/jinx.el
@@ -198,14 +198,23 @@ checking."
 
 ;;;; Keymaps
 
-(defvar-keymap jinx-misspelled-map
+(defvar-keymap jinx-overlay-map
   :doc "Keymap attached to misspelled words."
   "<mouse-1>" #'jinx-correct
   "M-n" #'jinx-next
   "M-p" #'jinx-previous
   "M-$" #'jinx-correct)
 
-(fset 'jinx-misspelled-map jinx-misspelled-map)
+(fset 'jinx-overlay-map jinx-overlay-map)
+
+(defvar-keymap jinx-repeat-map
+  :doc "Repeat keymap for navigation commands."
+  :repeat (:enter (jinx-next jinx-previous))
+  "M-n" #'jinx-next
+  "M-p" #'jinx-previous
+  "n" #'jinx-next
+  "p" #'jinx-previous
+  "$" #'jinx-correct)
 
 (defvar-keymap jinx-mode-map
   :doc "Keymap used when Jinx is active.")
@@ -309,7 +318,7 @@ Predicate may return a position to skip forward.")
 (put 'jinx-overlay 'modification-hooks    (list #'jinx--overlay-modified))
 (put 'jinx-overlay 'insert-in-front-hooks (list #'jinx--overlay-modified))
 (put 'jinx-overlay 'insert-behind-hooks   (list #'jinx--overlay-modified))
-(put 'jinx-overlay 'keymap                'jinx-misspelled-map)
+(put 'jinx-overlay 'keymap                'jinx-overlay-map)
 
 ;;;; Predicates