fix: sizing of key sequence column for palette

cfoust · Feb 5, 2024 · 127c25d · 127c25d
1 parent 0c9f034
commit 127c25d
Showing 1 changed file with 6 additions and 1 deletion.
diff --git a/pkg/cy/cy-boot.janet b/pkg/cy/cy-boot.janet
@@ -48,7 +48,12 @@ For example:
                                    (get x :sequence)
                                    (string/join x " ")
                                    (string " " x " ")))
-              (tuple [desc (string sequence)] func))
+              (tuple [desc
+                      (string
+                        # Padding on the left prevents the table library from
+                        # shrinking the key sequence string
+                        (string/repeat " " (max (- 15 (length (string sequence))) 0))
+                        sequence)] func))
            _)
          (input/find _ :prompt "search: actions")
          (apply _)))