branch: elpa/bind-map
commit f2f7dfefbdb35c5d7b41cd9ba444032408fd8351
Author: justbur <jus...@burkett.cc>
Commit: justbur <jus...@burkett.cc>
Assume :keys and :evil-keys are lists
---
bind-map.el | 10 ++--------
1 file changed, 2 insertions(+), 8 deletions(-)
diff --git a/bind-map.el b/bind-map.el
index 7bc80e0347..ae18429a8b 100644
--- a/bind-map.el
+++ b/bind-map.el
@@ -103,14 +103,8 @@ Declare a prefix command for MAP named COMMAND-NAME."
(activate (intern (format "%s-activate" map)))
(activate-func (intern (format "%s-activate-function" map)))
(prefix-cmd (plist-get args :prefix-cmd))
- (keys (when (plist-get args :keys)
- (if (listp (plist-get args :keys))
- (mapcar 'kbd (plist-get args :keys))
- (list (kbd (plist-get args :keys))))))
- (evil-keys (when (plist-get args :evil-keys)
- (if (listp (plist-get args :evil-keys))
- (mapcar 'kbd (plist-get args :evil-keys))
- (list (kbd (plist-get args :evil-keys))))))
+ (keys (mapcar 'kbd (plist-get args :keys)))
+ (evil-keys (mapcar 'kbd (plist-get args :evil-keys)))
(evil-states (or (plist-get args :evil-states)
bind-map-default-evil-states))
(minor-modes (plist-get args :minor-modes))
