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

@@ -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))
+    (let* ((n (+ i start))
-          (target-key (format "C-u %d RET" i)))
+           (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)))))