* which-key.el (which-key--create-pages-1): Use cl-decf for clarity

crzcrz · Apr 9, 2024 · 62ebafe · 62ebafe
1 parent 94a29cd
commit 62ebafe
Showing 1 changed file with 1 addition and 1 deletion.
diff --git 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)