From 9a145f30ff49a0141f342ea775e8f1a5b5899ae6 Mon Sep 17 00:00:00 2001 From: Craig Jennings Date: Tue, 2 Jun 2026 18:09:48 -0500 Subject: feat(keys): friendlier which-key labels for the prefix sub-maps The C-; L sub-prefixes were labelled +fetch / +views / +edit / +create / +delete / +open / +copy / +workspace, the which-key submenu idiom but terse. They now read fetch... / views... / edit... / create... and so on: drop the +, add an ellipsis so the label reads as "do this, then pick what." Leaf commands and the direct hot keys are unchanged. These labels are the (LABEL . COMMAND) menu-item strings baked into pearl-prefix-map, so which-key, describe-prefix, and which-key-less lookups all pick them up with no which-key dependency. Pure label strings, no behavior change. The keymap-label test moved to the new wording. --- pearl.el | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'pearl.el') diff --git a/pearl.el b/pearl.el index a6d7438..58e5bd3 100644 --- a/pearl.el +++ b/pearl.el @@ -6867,14 +6867,14 @@ diagnostics.") (define-key map "d" (cons "edit description" #'pearl-edit-description)) (define-key map "m" (cons "menu" #'pearl-menu)) ;; Category sub-maps -- two keys; each prefix names an action verb or noun. - (define-key map "f" (cons "+fetch" pearl-fetch-map)) - (define-key map "v" (cons "+views" pearl-views-map)) - (define-key map "e" (cons "+edit" pearl-edit-map)) - (define-key map "c" (cons "+create" pearl-create-map)) - (define-key map "k" (cons "+delete" pearl-delete-map)) - (define-key map "o" (cons "+open" pearl-open-map)) - (define-key map "y" (cons "+copy" pearl-copy-map)) - (define-key map "w" (cons "+workspace" pearl-workspace-map)) + (define-key map "f" (cons "fetch..." pearl-fetch-map)) + (define-key map "v" (cons "views..." pearl-views-map)) + (define-key map "e" (cons "edit..." pearl-edit-map)) + (define-key map "c" (cons "create..." pearl-create-map)) + (define-key map "k" (cons "delete..." pearl-delete-map)) + (define-key map "o" (cons "open..." pearl-open-map)) + (define-key map "y" (cons "copy..." pearl-copy-map)) + (define-key map "w" (cons "workspace..." pearl-workspace-map)) map) "Pearl command prefix keymap. Hot-path commands are bound directly; the rest live under sub-maps -- cgit v1.2.3