duplicated expanding when using corfu-indexed-mode

[Passky]

emacs-version:Development version e1e8da5e4f19 on master branch;
corfu version: corfu-20241105.2131
steps to reproduce:

1. emacs -Q -l minimal.el a.py
   minimal.el

(package-initialize)
(require 'corfu)
(require 'corfu-terminal)
(evil-mode)

(corfu-terminal-mode +1)


(use-package corfu
  ;; TAB-and-Go customizations
  :custom
  (corfu-cycle t)           ;; Enable cycling for `corfu-next/previous'
  (corfu-preselect 'prompt) ;; Always preselect the prompt

  ;; Use TAB for cycling, default is `corfu-complete'.
  :bind
  (:map corfu-map
        ("TAB" . corfu-next)
        ([tab] . corfu-next)
        ("S-TAB" . corfu-previous)
        ([backtab] . corfu-previous))

  :init
  (require 'cape)
  (corfu-indexed-mode)
  (dotimes (i 10) ;; use M-num to select index
	(define-key corfu-mode-map
				(kbd (format "M-%s" i))
				(kbd (format "C-%s <tab>" i))))
  )

a.py

#!/usr/bin/env python
pytest1
pytest2
pytest3
py| # assume | represents cursor

Alt-x corfu-mode
Alt-x cape-dabbrev
Alt-2 and press SPACE
expected behavior

#!/usr/bin/env python
pytest1
pytest2
pytest3
pytest1 |   # assume | represents cursor

and exactly

#!/usr/bin/env python
pytest1
pytest2
pytest3
pytest1est1 |           # assume | represents cursor

[minad]

Hi, I cannot reproduce this problem. Does it only happen in the presence of Evil mode? Can you please create a reproducer with corfu-mode and corfu-indexed-mode only?

[Passky]

I can still reproduce without evil-mode
and find out that codes below matters

;; comment key bindings and things just work 
  ;; Use TAB for cycling, default is `corfu-complete'.
  :bind
  (:map corfu-map
		("TAB" . corfu-next)
		([tab] . corfu-next)
		("S-TAB" . corfu-previous)
		([backtab] . corfu-previous))

so tab and go confilcts with this snippets

(dotimes (i 10) ;; use M-num to select index
	(define-key corfu-mode-map
				(kbd (format "M-%s" i))
				(kbd (format "C-%s <tab>" i))))

Gonna find a way to work out:)
and sorry for interrupt
Thanks:

[Passky]

And post a solution

(dotimes (i 10) ;; use M-num to select index
	   (keymap-set corfu-mode-map
				   (format "M-%s" i)
				   ;; (format "C-%s <tab>" i)
				   #'(lambda () (interactive "")
					   (dotimes (x i)
						 (corfu-next))
					   (corfu-insert))))