branch: externals/leaf commit 5ac6ae61e174ef4efbf87e72d40fb56944312a11 Author: Caowei <igoo...@gmail.com> Commit: Caowei <igoo...@gmail.com>
leaf-keys use the BIND-KEYMAP-PKG ranther than :package's value, when 'bind-keymap being non-nil. --- leaf.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/leaf.el b/leaf.el index 1f579f84c1..3ebc06f6ea 100644 --- a/leaf.el +++ b/leaf.el @@ -872,8 +872,8 @@ If BIND-KEYMAP-PKG is passed, require it before binding. OPTIONAL: BIND also accept below form. (:{{map}} :package {{pkg}} (KEY . COMMAND) (KEY . COMMAND)) - KEYMAP is quoted keymap name. - PKG is quoted package name which define KEYMAP. + KEYMAP is keymap name. + PKG is package name which define KEYMAP. (wrap `eval-after-load' PKG) If DRYRUN-NAME is non-nil, return list like @@ -924,7 +924,7 @@ NOTE: BIND can also accept list of these." (lambda (elm) (push (cdr elm) fns) (if bind-keymap - `(leaf-key-bind-keymap ,(car elm) ,(cdr elm) ',map ',pkg) + `(leaf-key-bind-keymap ,(car elm) ,(cdr elm) ',map ,bind-keymap-pkg) `(leaf-key ,(car elm) #',(cdr elm) ',map))) elmbinds)))) (push (if pkg