branch: externals/tmr commit 9db3306908dbbeed948438c8a04445e98e684f68 Author: Daniel Mendler <m...@daniel-mendler.de> Commit: Protesilaos Stavrou <i...@protesilaos.com>
Use simpler paradigm for keymap autoloading. --- tmr.el | 11 ++--------- 1 file changed, 2 insertions(+), 9 deletions(-) diff --git a/tmr.el b/tmr.el index 86b351399b..167dbb9204 100644 --- a/tmr.el +++ b/tmr.el @@ -492,15 +492,8 @@ This map should be bound to a global prefix." "R" #'tmr-remove-finished "k" #'tmr-cancel) -;;;###autoload -(defun tmr-prefix-map () - "Helper command to autoload variable `tmr-prefix-map'." - (interactive) - ;; Redefine the prefix map and replay events - (fset #'tmr-prefix-map tmr-prefix-map) - (setq unread-command-events - (mapcar (lambda (ev) (cons t ev)) - (listify-key-sequence (this-command-keys-vector))))) +;;;###autoload (autoload 'tmr-prefix-map "tmr" nil t 'keymap) +(defalias 'tmr-prefix-map tmr-prefix-map) (defvar embark-keymap-alist) (defvar embark-post-action-hooks)