Fix vertico hotkeys

2023-08-13 12:46:25 -07:00 · 2023-08-13 12:46:25 -07:00 · 1d7e47eb72
parent 27e65e61ab
commit 1d7e47eb72
1 changed files with 2 additions and 2 deletions
--- a/init.el
+++ b/init.el
@ -129,8 +129,8 @@
  (dotimes (i 9)
    (keymap-set vertico-map (format "M-%d" (+ i 1))
                `(lambda () (interactive)
-                   (let ((current-prefix-arg (+ ,i 1)))
-                     (call-interactively #'vertico-exit)))))
+                   (setq vertico--index ,i)
+                   (vertico-exit))))
  (vertico-indexed-mode))

 ;; Editorconfig support