diff options
| author | Craig Jennings <c@cjennings.net> | 2025-10-25 19:56:40 -0500 |
|---|---|---|
| committer | Craig Jennings <c@cjennings.net> | 2025-10-25 19:56:40 -0500 |
| commit | 746cefd4d674bfc6dd9fdfe4aeb79c7e760ec268 (patch) | |
| tree | 8bb53c9300298028390dec51f8cc46ada5689b2e /modules/mail-config.el | |
| parent | d69f41af1f6e0d1bea8a2942f5e99b6ef961c1ef (diff) | |
refactor:keymaps: Replace define-prefix-command with defvar-keymap
Refactor the keymap definitions across multiple modules by replacing
`define-prefix-command` with `defvar-keymap`. This simplifies the
keymap setup and integrates better with the `which-key` package for
enhanced documentation and usability. Updated modules include
custom-ordering, custom-text-enclose, custom-whitespace,
mail-config, music-config, org-drill-config, test-runner, and
vc-config.
Diffstat (limited to 'modules/mail-config.el')
| -rw-r--r-- | modules/mail-config.el | 13 |
1 files changed, 7 insertions, 6 deletions
diff --git a/modules/mail-config.el b/modules/mail-config.el index e51cefd4..c65e5342 100644 --- a/modules/mail-config.el +++ b/modules/mail-config.el @@ -288,17 +288,18 @@ Prompts user for the action when executing." :load-path "~/code/org-msg/" :after (org mu4e) :preface - (define-prefix-command 'cj/email-map nil - "keymap for email operations.") - (keymap-set cj/custom-keymap "e" #'cj/email-map) + (defvar-keymap cj/email-map + :doc "Keymap for email operations" + "a" #'org-msg-attach-attach + "d" #'org-msg-attach-delete) + (keymap-set cj/custom-keymap "e" cj/email-map) + (with-eval-after-load 'which-key + (which-key-add-key-based-replacements "C-; e" "email menu")) :bind ;; more intuitive keybinding for attachments (:map org-msg-edit-mode-map ("C-c C-a" . org-msg-attach-attach) ("C-c C-d" . org-msg-attach-delete)) - (:map cj/email-map - ("a" . org-msg-attach-attach) - ("d" . org-msg-attach-delete)) :config ;; inline CSS, no postamble, no TOC, no stars or footers (setq org-msg-options "html-postamble:nil H:5 num:nil ^:{} toc:nil author:nil email:nil") |
