diff options
| author | verdant <i@glowisle.me> | 2026-02-10 17:06:37 +0800 |
|---|---|---|
| committer | verdant <i@glowisle.me> | 2026-02-10 17:06:37 +0800 |
| commit | ad6ca5c9c2b97ab79fa10d62b1c7ec875f61487a (patch) | |
| tree | dd9960ec8aefbe659b364a18ef96f55a67d54806 /lazy-numbers.el | |
| parent | fb795f857c7f8a0465ae6beb964b582546fb6561 (diff) | |
| download | lazy-numbers-ad6ca5c9c2b97ab79fa10d62b1c7ec875f61487a.tar.gz lazy-numbers-ad6ca5c9c2b97ab79fa10d62b1c7ec875f61487a.zip | |
chore: remove (define-key-map) to pass package-lint
Diffstat (limited to 'lazy-numbers.el')
| -rw-r--r-- | lazy-numbers.el | 18 |
1 files changed, 5 insertions, 13 deletions
diff --git a/lazy-numbers.el b/lazy-numbers.el index a14e2e9..44a8b76 100644 --- a/lazy-numbers.el +++ b/lazy-numbers.el @@ -12,7 +12,7 @@ ;; Use `C-'` and home row keys to enter numbers ;;; Code: -(defvar lazy-number-transient-map +(defvar lazy-numbers-transient-map (let ((map (make-sparse-keymap))) (define-key map (kbd "a") (lambda () (interactive) (insert "1") (forward-char 1))) (define-key map (kbd "s") (lambda () (interactive) (insert "2") (forward-char 1))) @@ -25,23 +25,15 @@ (define-key map (kbd "l") (lambda () (interactive) (insert "9") (forward-char 1))) (define-key map (kbd ";") (lambda () (interactive) (insert "0") (forward-char 1))) - ;; exit - (define-key map (kbd "ESC") #'keyboard-quit) map) "Key map for SPC number input.") -(defun lazy-number-enter () +;;;###autoload +(defun lazy-numbers-enter () "Enter transient number input mode." (interactive) - (set-transient-map lazy-number-transient-map t)) - -(global-set-key (kbd "C-'") #'lazy-number-enter) - -(defvar lazy-number-mode-map - (let ((map (make-sparse-keymap))) - (define-key map (kbd "C-'") #'lazy-number-enter) - map)) + (set-transient-map lazy-numbers-transient-map t)) (provide 'lazy-numbers) -;;; lazy-number.el ends here +;;; lazy-numbers.el ends here |
