mu4e-helpers: fix mu4e-keymap-set for older emacs
This commit is contained in:
@ -605,8 +605,8 @@ shorter keys in some cases where there are multiple bindings."
|
|||||||
Temporary version, from Emacs 29."
|
Temporary version, from Emacs 29."
|
||||||
(when (fboundp 'key-valid-p) (cl-assert (key-valid-p key)))
|
(when (fboundp 'key-valid-p) (cl-assert (key-valid-p key)))
|
||||||
(when (stringp definition)
|
(when (stringp definition)
|
||||||
(when (fboundp 'key-valid-p) (cl-assert (key-valid-p definition)))
|
(when (or (not (fboundp 'key-valid-p)) (cl-assert (key-valid-p definition)))
|
||||||
(setq definition (key-parse definition)))
|
(setq definition (key-parse definition))))
|
||||||
(define-key keymap (key-parse key) definition))
|
(define-key keymap (key-parse key) definition))
|
||||||
|
|
||||||
(provide 'mu4e-helpers)
|
(provide 'mu4e-helpers)
|
||||||
|
|||||||
Reference in New Issue
Block a user