From 6e035b5e2f7c94d39fe4a6765c6c52258bcf14d5 Mon Sep 17 00:00:00 2001 From: Jeremy Bryant Date: Fri, 8 Mar 2024 23:20:07 +0000 Subject: [PATCH] Use declare form instead of put for clarity * which-key.el (which-key-add-keymap-based-replacements): Use declare form instead of put property. --- which-key.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/which-key.el b/which-key.el index af4bc6cb337..4a0b8b8e045 100644 --- a/which-key.el +++ b/which-key.el @@ -1023,6 +1023,7 @@ prefix. An example is For backwards compatibility, REPLACEMENT can also be a string, but the above format is preferred, and the option to use a string for REPLACEMENT will eventually be removed." + (declare (indent defun)) (while key (let ((def (cond @@ -1036,7 +1037,6 @@ for REPLACEMENT will eventually be removed." (define-key keymap (kbd key) def)) (setq key (pop more) replacement (pop more)))) -(put 'which-key-add-keymap-based-replacements 'lisp-indent-function 'defun) ;;;###autoload (defun which-key-add-key-based-replacements