From 746cefd4d674bfc6dd9fdfe4aeb79c7e760ec268 Mon Sep 17 00:00:00 2001
From: Craig Jennings <c@cjennings.net>
Date: Sat, 25 Oct 2025 19:56:40 -0500
Subject: 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.
---
 modules/test-runner.el | 26 ++++++++++++++------------
 1 file changed, 14 insertions(+), 12 deletions(-)

(limited to 'modules/test-runner.el')

diff --git a/modules/test-runner.el b/modules/test-runner.el
index e05a4e0b..b4c40820 100644
--- a/modules/test-runner.el
+++ b/modules/test-runner.el
@@ -252,19 +252,21 @@ Otherwise, message that no test is found."
 	(cj/test-run-focused)))
 
 ;; Test runner operations prefix and keymap
-(define-prefix-command 'cj/test-map nil
-					   "Keymap for test-runner operations.")
-(keymap-set cj/custom-keymap "t" #'cj/test-map)
+(defvar-keymap cj/testrunner-map
+  :doc "Keymap for test-runner operations"
+  "L" #'cj/test-load-all
+  "R" #'cj/test-run-all
+  "." #'cj/run-test-at-point
+  "r" #'cj/test-run-smart
+  "a" #'cj/test-focus-add
+  "b" #'cj/test-focus-add-this-buffer-file
+  "c" #'cj/test-focus-clear
+  "v" #'cj/test-view-focused
+  "t" #'cj/test-toggle-mode)
 
-(keymap-set cj/test-map "L" #'cj/test-load-all)
-(keymap-set cj/test-map "R" #'cj/test-run-all)
-(keymap-set cj/test-map "." #'cj/run-test-at-point)
-(keymap-set cj/test-map "r" #'cj/test-run-smart)
-(keymap-set cj/test-map "a" #'cj/test-focus-add)
-(keymap-set cj/test-map "b" #'cj/test-focus-add-this-buffer-file)
-(keymap-set cj/test-map "c" #'cj/test-focus-clear)
-(keymap-set cj/test-map "v" #'cj/test-view-focused)
-(keymap-set cj/test-map "t" #'cj/test-toggle-mode)
+(keymap-set cj/custom-keymap "t" cj/testrunner-map)
+(with-eval-after-load 'which-key
+  (which-key-add-key-based-replacements "C-; t" "test runner menu"))
 
 (provide 'test-runner)
 ;;; test-runner.el ends here
-- 
cgit v1.2.3