branch: externals/which-key
commit 62ebafeae751fe130d1ac27c55930385ccce2757
Author: Jeremy Bryant <[email protected]>
Commit: Justin Burkett <[email protected]>

    * which-key.el (which-key--create-pages-1): Use cl-decf for clarity
---
 which-key.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/which-key.el b/which-key.el
index decde2d10b..8837eefd43 100644
--- a/which-key.el
+++ b/which-key.el
@@ -2077,7 +2077,7 @@ should be minimized."
       ;; simple search for a fitting page
       (while (and (> available-lines min-lines)
                   (not found))
-        (setq available-lines (- available-lines 1)
+        (setq available-lines (cl-decf available-lines)
               prev-result result
               result (which-key--list-to-pages
                       keys available-lines available-width)

Reply via email to