diff options
Diffstat (limited to 'modules/custom-ordering.el')
| -rw-r--r-- | modules/custom-ordering.el | 17 |
1 files changed, 10 insertions, 7 deletions
diff --git a/modules/custom-ordering.el b/modules/custom-ordering.el index 8e8a4da6..5d308604 100644 --- a/modules/custom-ordering.el +++ b/modules/custom-ordering.el @@ -84,13 +84,16 @@ Produce a comma-separated list as the result." ;; Ordering & sorting prefix and keymap -(define-prefix-command 'cj/ordering-map nil - "text ordering and sorting operations.") -(keymap-set cj/custom-keymap "o" #'cj/ordering-map) -(keymap-set cj/ordering-map "a" #'cj/arrayify) -(keymap-set cj/ordering-map "u" #'cj/unarrayify) -(keymap-set cj/ordering-map "A" #'cj/alphabetize-region) -(keymap-set cj/ordering-map "l" #'cj/comma-separated-text-to-lines) +(defvar-keymap cj/ordering-map + :doc "Keymap for text ordering and sorting operations" + "a" #'cj/arrayify + "u" #'cj/unarrayify + "A" #'cj/alphabetize-region + "l" #'cj/comma-separated-text-to-lines) + +(keymap-set cj/custom-keymap "o" cj/ordering-map) +(with-eval-after-load 'which-key + (which-key-add-key-based-replacements "C-; o" "ordering/sorting menu")) (provide 'custom-ordering) ;;; custom-ordering.el ends here. |