branch: externals/frog-menu
commit eedd6902956bdcae9bb57dc827ce8eb2fcf117e2
Author: Clemens Radermacher <[email protected]>
Commit: Clemens Radermacher <[email protected]>

    Fix menu format
---
 frog-menu.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/frog-menu.el b/frog-menu.el
index 07a35e5..c980403 100644
--- a/frog-menu.el
+++ b/frog-menu.el
@@ -253,7 +253,7 @@ PROMPT and ACTIONS are the arguments of `frog-menu-read'."
       (let ((fill-column (1+ (funcall frog-menu-grid-width-function))))
         (fill-region header-pos (point))
         (align-regexp header-pos (point) "\\(\\s-*\\) " 1 1 nil)
-        (while (re-search-backward "_" nil t)
+        (while (re-search-backward "_" header-pos t)
           (replace-match " "))))
     (goto-char (point-min))
     ;; one more for the avy char

Reply via email to