[elpa] externals/corfu fe1d3b65e3: Use keymap-set

[ELPA Syncer]

branch: externals/corfu
commit fe1d3b65e3d3592752a9379c3f45b8ddb8a53cf5
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Use keymap-set
---
 corfu.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/corfu.el b/corfu.el
index 5c5c6ac338..139743f001 100644
--- a/corfu.el
+++ b/corfu.el
@@ -351,7 +351,7 @@ The completion backend can override this with
   (let ((map (make-sparse-keymap)))
     (dotimes (i 7)
       (dolist (k '(mouse down-mouse drag-mouse double-mouse triple-mouse))
-        (define-key map (vector (intern (format "%s-%s" k (1+ i)))) #'ignore)))
+        (keymap-set map (format "<%s-%s>" k (1+ i)) #'ignore)))
     map)
   "Ignore all mouse clicks.")