materus
/
emacs-corfu-mouse
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Use corfu--goto instead of let-binding corfu--index

This commit is contained in:
Akib Azmain Turja 2022-06-27 17:44:13 +06:00
parent d0fdc8924b
commit 232592c6b8
No known key found for this signature in database
GPG Key ID: 5535FCF54D88616B
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
corfu-mouse.el
View File

@ -57,13 +57,13 @@
(define-key map [mouse-1] (define-key map [mouse-1]
(lambda () (lambda ()
(interactive) (interactive)
(let ((corfu--index index)) (corfu--goto index)
(corfu-insert)))) (corfu-insert)))
(define-key map [mouse-3] (define-key map [mouse-3]
(lambda () (lambda ()
(interactive) (interactive)
(let ((corfu--index index)) (corfu--goto index)
(corfu-complete)))) (corfu-complete)))
map)) map))
(defun corfu-mouse--format-candidates (fcands) (defun corfu-mouse--format-candidates (fcands)