This commit is contained in:
James Nguyen 2022-04-14 10:16:13 -04:00
parent ff9ae709ca
commit 1c42b423f9
1 changed files with 10 additions and 10 deletions

View File

@ -381,16 +381,16 @@ binding in `annalist' as so."
(key-with-prefix (concat prefix key))
(def (pop bindings))
(def-with-menu-item
`(menu-item
""
nil
:filter
(lambda (&optional _)
(when (or
(eq evil-this-operator (key-binding ,remap))
(memq evil-this-operator ,operators))
(setq evil-inhibit-operator t)
',def)))))
`(menu-item
""
nil
:filter
(lambda (&optional _)
(when (or
(eq evil-this-operator (key-binding ,remap))
(memq evil-this-operator ,operators))
(setq evil-inhibit-operator t)
',def)))))
(when (or (and whitelist (member key-with-prefix whitelist))
(not (member key-with-prefix blacklist)))
(annalist-record 'evil-collection 'keybindings