From 1f55b85887050b0b2a84466dc001d81471b13343 Mon Sep 17 00:00:00 2001 From: Jeremy Bryant Date: Sun, 10 Mar 2024 22:40:47 +0000 Subject: [PATCH] * which-key.el (which-key--pad-column): Untabify. --- which-key.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/which-key.el b/which-key.el index dcb5af7..fcdaec4 100644 --- a/which-key.el +++ b/which-key.el @@ -1996,17 +1996,17 @@ that width." (let* ((col-key-width (+ which-key-add-column-padding (which-key--max-len col-keys 0))) (col-sep-width (which-key--max-len col-keys 1)) - (avl-width (- avl-width col-key-width col-sep-width)) + (avl-width (- avl-width col-key-width col-sep-width)) (col-desc-width (min avl-width - (which-key--max-len + (which-key--max-len col-keys 2 - which-key-min-column-description-width))) + which-key-min-column-description-width))) (col-width (+ col-key-width col-sep-width col-desc-width)) - (col-format (concat "%" (int-to-string col-key-width) + (col-format (concat "%" (int-to-string col-key-width) "s%s%-" (int-to-string col-desc-width) "s"))) (cons col-width (mapcar (lambda (k) (apply #'format col-format k)) - col-keys)))) + col-keys)))) (defun which-key--partition-list (n list) "Partition LIST into N-sized sublists."