diff options
| author | Case Duckworth | 2022-01-05 11:24:22 -0600 |
|---|---|---|
| committer | Case Duckworth | 2022-01-05 11:24:22 -0600 |
| commit | b2980816c5031b99d318368ab43d5aafe4b35429 (patch) | |
| tree | c716eeb4f2143726f03aeccbeb7acad00c70410d | |
| parent | Change +casing keymap (diff) | |
| download | emacs-b2980816c5031b99d318368ab43d5aafe4b35429.tar.gz emacs-b2980816c5031b99d318368ab43d5aafe4b35429.zip | |
Don't ensure functions in :+key, :+leader, :+menu
| -rw-r--r-- | lisp/+key.el | 8 |
1 files changed, 4 insertions, 4 deletions
| diff --git a/lisp/+key.el b/lisp/+key.el index 4638e95..ad3b215 100644 --- a/lisp/+key.el +++ b/lisp/+key.el | |||
| @@ -83,15 +83,15 @@ | |||
| 83 | `(define-key +key-mode-map ,key ,command)) | 83 | `(define-key +key-mode-map ,key ,command)) |
| 84 | :documentation "Bind KEY to COMMAND in `+key-mode-map'." | 84 | :documentation "Bind KEY to COMMAND in `+key-mode-map'." |
| 85 | :debug '(form sexp) | 85 | :debug '(form sexp) |
| 86 | :ensure '(kbd func) | 86 | :ensure '(kbd nil) |
| 87 | :repeatable t) | 87 | :repeatable t) |
| 88 | 88 | ||
| 89 | (setup-define :+leader | 89 | (setup-define :+leader |
| 90 | (lambda (key command) | 90 | (lambda (key command) |
| 91 | `(define-key +key-leader-map ,key ,command)) | 91 | `(define-key +key-leader-map ,key ,command)) |
| 92 | :documentation "Bind KEY to COMMAND in `+key-leader-map'." | 92 | :documentation "Bind KEY to COMMAND in `+key-leader-map'." |
| 93 | :debug '(form sexp) | 93 | :debug '(form sexp) |
| 94 | :ensure '(kbd func) | 94 | :ensure '(kbd nil) |
| 95 | :repeatable t) | 95 | :repeatable t) |
| 96 | 96 | ||
| 97 | (setup-define :+menu | 97 | (setup-define :+menu |
| @@ -99,7 +99,7 @@ | |||
| 99 | `(define-key +key-menu-map ,key ,command)) | 99 | `(define-key +key-menu-map ,key ,command)) |
| 100 | :documentation "Bind KEY to COMMAND in `+key-leader-map'." | 100 | :documentation "Bind KEY to COMMAND in `+key-leader-map'." |
| 101 | :debug '(form sexp) | 101 | :debug '(form sexp) |
| 102 | :ensure '(kbd func) | 102 | :ensure '(kbd nil) |
| 103 | :repeatable t)) | 103 | :repeatable t)) |
| 104 | 104 | ||
| 105 | (provide '+key) | 105 | (provide '+key) |