branch: externals/frog-menu
commit 173aea75ef16e59d7cc2ecd6136b1ec196b35da2
Author: Clemens Radermacher <clem...@posteo.net>
Commit: Clemens Radermacher <clem...@posteo.net>

    Add more padding to the right of menu
---
 frog-menu.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/frog-menu.el b/frog-menu.el
index 3456044..3617711 100644
--- a/frog-menu.el
+++ b/frog-menu.el
@@ -296,7 +296,9 @@ ACTIONS."
     (while (not (eobp))
       (goto-char (line-end-position))
       ;; Fix: assumes only one avy char...
-      (insert (concat " " (if frog-menu-avy-padding " " "")))
+      (insert (concat " "
+                      (make-string frog-menu-min-col-padding ?\s)
+                      (if frog-menu-avy-padding " " "")))
       (forward-line 1)))
   ;; posframe needs point at start,
   ;; otherwise it fails on first init

Reply via email to