diff options
Diffstat (limited to 'lisp/use-package/use-package-bind-key.el')
| -rw-r--r-- | lisp/use-package/use-package-bind-key.el | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/lisp/use-package/use-package-bind-key.el b/lisp/use-package/use-package-bind-key.el index d17ecb2cf75..e476b060ad6 100644 --- a/lisp/use-package/use-package-bind-key.el +++ b/lisp/use-package/use-package-bind-key.el @@ -1,4 +1,4 @@ -;;; use-package-bind-key.el --- Support for the :bind/:bind-keymap keywords +;;; use-package-bind-key.el --- Support for the :bind/:bind-keymap keywords -*- lexical-binding: t; -*- ;; Copyright (C) 2012-2017 John Wiegley @@ -61,7 +61,8 @@ deferred until the prefix key sequence is pressed." (bind-key* key keymap) (bind-key key keymap)) (setq unread-command-events - (listify-key-sequence kv))) + (mapcar (lambda (ev) (cons t ev)) + (listify-key-sequence kv)))) (use-package-error (format "package.el %s failed to define keymap %s" package keymap-symbol))))) @@ -127,7 +128,7 @@ deferred until the prefix key sequence is pressed." ;;;###autoload (defun use-package-handler/:bind - (name keyword args rest state &optional bind-macro) + (name _keyword args rest state &optional bind-macro) (use-package-concat (use-package-process-keywords name rest state) `(,@(mapcar @@ -148,7 +149,7 @@ deferred until the prefix key sequence is pressed." ;;;###autoload (defun use-package-handler/:bind-keymap - (name keyword args rest state &optional override) + (name _keyword args rest state &optional override) (use-package-concat (use-package-process-keywords name rest state) (mapcar |