diff options
author | David Morgan <djm_uk@protonmail.com> | 2024-10-02 13:07:25 +0100 |
---|---|---|
committer | David Morgan <djm_uk@protonmail.com> | 2024-10-02 13:07:25 +0100 |
commit | d7578c0df016fe8f797e260208e10742ec84aeae (patch) | |
tree | d7a2e5ac29ed16d3ca555b38262dde8d008bc6c4 /.emacs.d/lisp/init-minibuffer.el | |
parent | 3e09f18ef9ce7ea46878109a9c0fd1bbb5334bf5 (diff) | |
download | dotfiles-d7578c0df016fe8f797e260208e10742ec84aeae.tar.gz |
Use corfu-indexed without tab/enter
Diffstat (limited to '.emacs.d/lisp/init-minibuffer.el')
-rw-r--r-- | .emacs.d/lisp/init-minibuffer.el | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/.emacs.d/lisp/init-minibuffer.el b/.emacs.d/lisp/init-minibuffer.el index c96ea98..0f8b97a 100644 --- a/.emacs.d/lisp/init-minibuffer.el +++ b/.emacs.d/lisp/init-minibuffer.el @@ -222,21 +222,21 @@ DEFS is a plist associating completion categories to commands." (use-extension vertico vertico-indexed :config - (defmacro define-choose (n) + (defmacro define-vertico-choose (n) `(defun ,(intern (format "vertico-indexed-choose-%s" n)) () ,(format "Exit minibuffer with candidate %s." n) (interactive) (let ((vertico--index ,n)) (funcall-interactively 'vertico-exit)))) - (defmacro define-insert (n) + (defmacro define-vertico-insert (n) `(defun ,(intern (format "vertico-indexed-insert-%s" n)) () ,(format "Insert candidate %s in minibuffer." n) (interactive) (let ((vertico--index ,n)) (funcall-interactively 'vertico-insert)))) (dotimes (n 10) - (eval `(define-choose ,n)) - (eval `(define-insert ,n)) + (eval `(define-vertico-choose ,n)) + (eval `(define-vertico-insert ,n)) (define-key vertico-map (kbd (format "C-%s" n)) (intern (format "vertico-indexed-choose-%s" n))) (define-key vertico-map (kbd (format "M-%s" n)) (intern (format "vertico-indexed-insert-%s" n)))) (vertico-indexed-mode 1)) |