branch: externals/frog-menu
commit fbe8f8869fd4d000c4bcd51336fec061040e2425
Author: Clemens Radermacher <[email protected]>
Commit: Clemens Radermacher <[email protected]>
Fix adding padding for avy char
---
frog-menu.el | 13 +++++++------
1 file changed, 7 insertions(+), 6 deletions(-)
diff --git a/frog-menu.el b/frog-menu.el
index c980403..5b8fae4 100644
--- a/frog-menu.el
+++ b/frog-menu.el
@@ -192,7 +192,13 @@ ACTIONS."
(funcall frog-menu-grid-column-function)
(funcall frog-menu-grid-width-function)))
(insert "\n\n")
- (insert (frog-menu--prompt-format prompt actions)))
+ (insert (frog-menu--prompt-format prompt actions))
+ ;; padding for avy char
+ (goto-char (point-min))
+ (while (not (eobp))
+ (goto-char (line-end-position))
+ (insert " ")
+ (forward-line 1)))
;; * Formatting
@@ -256,11 +262,6 @@ PROMPT and ACTIONS are the arguments of `frog-menu-read'."
(while (re-search-backward "_" header-pos t)
(replace-match " "))))
(goto-char (point-min))
- ;; one more for the avy char
- (while (not (eobp))
- (goto-char (line-end-position))
- (insert " ")
- (forward-line 1))
(buffer-string)))
;; * Display
