diff options
| author | Case Duckworth | 2021-03-30 11:58:05 -0500 |
|---|---|---|
| committer | Case Duckworth | 2021-03-30 11:58:05 -0500 |
| commit | be24eae19afeb32641525f898473c6db71b2cc30 (patch) | |
| tree | bbe28eb7f3db288520d9f7738e133351acaec8ec | |
| parent | Correct typo (diff) | |
| download | emacs-be24eae19afeb32641525f898473c6db71b2cc30.tar.gz emacs-be24eae19afeb32641525f898473c6db71b2cc30.zip | |
Add autoloads to `:acdw/map' and `:acdw/leader'
| -rw-r--r-- | init.el | 16 |
1 files changed, 10 insertions, 6 deletions
| diff --git a/init.el b/init.el index 39bb77b..b2236a1 100644 --- a/init.el +++ b/init.el | |||
| @@ -42,9 +42,11 @@ | |||
| 42 | ;; Bind keys to `acdw/map' | 42 | ;; Bind keys to `acdw/map' |
| 43 | (setup-define :acdw/map | 43 | (setup-define :acdw/map |
| 44 | (lambda (key command) | 44 | (lambda (key command) |
| 45 | `(define-key acdw/map | 45 | `(progn |
| 46 | ,(if (stringp key) (kbd key) key) | 46 | (autoload #',command (symbol-name setup-name)) |
| 47 | #',command)) | 47 | (define-key acdw/map |
| 48 | ,(if (stringp key) (kbd key) key) | ||
| 49 | #',command))) | ||
| 48 | :documentation "Bind KEY to COMMAND in `acdw/map'." | 50 | :documentation "Bind KEY to COMMAND in `acdw/map'." |
| 49 | :debug '(form sexp) | 51 | :debug '(form sexp) |
| 50 | :repeatable t) | 52 | :repeatable t) |
| @@ -52,9 +54,11 @@ | |||
| 52 | ;; Bind keys to `acdw/leader' | 54 | ;; Bind keys to `acdw/leader' |
| 53 | (setup-define :acdw/leader | 55 | (setup-define :acdw/leader |
| 54 | (lambda (key command) | 56 | (lambda (key command) |
| 55 | `(define-key acdw/leader | 57 | `(progn |
| 56 | ,(if (stringp key) (kbd key) key) | 58 | (autoload #',command (symbol-name setup-name)) |
| 57 | #',command)) | 59 | (define-key acdw/leader |
| 60 | ,(if (stringp key) (kbd key) key) | ||
| 61 | #',command))) | ||
| 58 | :documentation "Bind KEY to COMMAND in `acdw/leader' map." | 62 | :documentation "Bind KEY to COMMAND in `acdw/leader' map." |
| 59 | :debug '(form sexp) | 63 | :debug '(form sexp) |
| 60 | :repeatable t) | 64 | :repeatable t) |