Skip to content
This repository has been archived by the owner on Jun 25, 2024. It is now read-only.

Commit

Permalink
* which-key.el (which-key--create-pages): Untabify.
Browse files Browse the repository at this point in the history
  • Loading branch information
jeremy-bryant authored and justbur committed Mar 12, 2024
1 parent 1f55b85 commit afcea61
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions which-key.el
Original file line number Diff line number Diff line change
Expand Up @@ -2101,7 +2101,7 @@ is the width of the live window."
(avl-width (if prefix (- max-width prefix) max-width))
(vertical (or (and (eq which-key-popup-type 'side-window)
(member which-key-side-window-location '(left right)))
(eq which-key-max-display-columns 1)))
(eq which-key-max-display-columns 1)))
result)
(setq result
(which-key--create-pages-1
Expand All @@ -2114,7 +2114,7 @@ is the width of the live window."
(which-key--maybe-get-prefix-title
(key-description prefix-keys))))
(when prefix-top-bottom
;; Add back the line earlier reserved for the page information.
;; Add back the line earlier reserved for the page information.
(setf (which-key--pages-height result) max-lines))
(when (and (= (which-key--pages-num-pages result) 1)
(> which-key-min-display-lines
Expand Down

0 comments on commit afcea61

Please sign in to comment.