From 4ea679586bf31243f14861f52a269a965a4e3e08 Mon Sep 17 00:00:00 2001 From: Zedhugh Chen Date: Fri, 15 May 2026 22:13:46 +0800 Subject: [PATCH] modify vertico/corfu indexed keybindings from 1 instead of 0 old indexed keybindings from M-0 to M-9, it's not convenient, now change keybindings from M-1 -> M-9 -> M-0, M-0 mean M-10. --- lisp/init-vertico.el | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/lisp/init-vertico.el b/lisp/init-vertico.el index cae6b63..9db1291 100644 --- a/lisp/init-vertico.el +++ b/lisp/init-vertico.el @@ -44,7 +44,7 @@ ;;; indexed extension -(let ((start 0) +(let ((start 1) (count 10)) (require 'vertico-indexed) (require 'corfu-indexed) @@ -55,8 +55,10 @@ corfu-count count corfu-indexed-start start) (dotimes (i count) - (let ((press-key (format "M-%d" i)) - (target-key (format "C-u %d RET" i))) + (let* ((n (+ i start)) + (k (mod n count)) + (press-key (format "M-%d" k)) + (target-key (format "C-u %d RET" n))) (define-key vertico-map (kbd press-key) (kbd target-key)) (define-key corfu-map (kbd press-key) (kbd target-key)))))