masscollaborationlabs/emacs
2
0
Fork 0
mirror of https://github.com/masscollaborationlabs/emacs.git synced 2025-07-04 11:23:24 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

; Fix typos in 'which-key-mode' (bug#72093)

Browse source 
* lisp/which-key.el (which-key-preserve-window-configuration):
Correct spelling of "taken".
(which-key--create-pages): Correct spelling of "widths".
(which-key--start-paging-timer): Correct spelling of
"secondary".
This commit is contained in:
john muhl 2024-07-10 17:13:58 -05:00 • committed by Eli Zaretskii
parent a6c78ccf5f
commit e6f78485aa
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
lisp/which-key.el
View file

@ -444,7 +444,7 @@ Note that `which-key-idle-delay' should be set before turning on
If non-nil, save window configuration before which-key buffer is If non-nil, save window configuration before which-key buffer is
shown and restore it after which-key buffer is hidden. It shown and restore it after which-key buffer is hidden. It
prevents which-key from changing window position of visible prevents which-key from changing window position of visible
buffers. Only takken into account when popup type is buffers. Only taken into account when popup type is
side-window." side-window."
:type 'boolean :type 'boolean
:package-version "1.0" :version "30.1") :package-version "1.0" :version "30.1")
@ -2113,7 +2113,7 @@ should be minimized."
(defun which-key--create-pages (keys &optional prefix-keys prefix-title) (defun which-key--create-pages (keys &optional prefix-keys prefix-title)
"Create page strings using `which-key--list-to-pages'. "Create page strings using `which-key--list-to-pages'.
Will try to find the best number of rows and columns using the Will try to find the best number of rows and columns using the
given dimensions and the length and wdiths of KEYS. SEL-WIN-WIDTH given dimensions and the length and widths of KEYS. SEL-WIN-WIDTH
is the width of the live window." is the width of the live window."
(let* ((max-dims (which-key--popup-max-dimensions)) (let* ((max-dims (which-key--popup-max-dimensions))
(max-lines (car max-dims)) (max-lines (car max-dims))
@ -2825,7 +2825,7 @@ Finally, show the buffer."
(funcall which-key-this-command-keys-function))))) (funcall which-key-this-command-keys-function)))))
(cancel-timer which-key--paging-timer) (cancel-timer which-key--paging-timer)
(if which-key-idle-secondary-delay (if which-key-idle-secondary-delay
;; we haven't executed a command yet so the secandary ;; we haven't executed a command yet so the secondary
;; timer is more relevant here ;; timer is more relevant here
(which-key--start-timer which-key-idle-secondary-delay t) (which-key--start-timer which-key-idle-secondary-delay t)
(which-key--start-timer))))))) (which-key--start-timer)))))))