[elpa] externals/corfu 3ba9851999: Add corfu-mode-map

[ELPA Syncer]

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

    Add corfu-mode-map
---
 CHANGELOG.org | 1 +
 corfu.el      | 7 +++++--
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/CHANGELOG.org b/CHANGELOG.org
index f05c3fd31d..6aecdf0c4d 100644
--- a/CHANGELOG.org
+++ b/CHANGELOG.org
@@ -5,6 +5,7 @@
 * Development
 
 - =corfu-quick=: Bugfix.
+- =corfu-mode-map=: Add mode map.
 
 * Version 0.37 (2023-07-02)
 
diff --git a/corfu.el b/corfu.el
index e3b9c66a79..8a83726116 100644
--- a/corfu.el
+++ b/corfu.el
@@ -222,8 +222,11 @@ completion backend in use is expensive."
   '((t :inherit shadow :strike-through t))
   "Face used for deprecated candidates.")
 
+(defvar-keymap corfu-mode-map
+  :doc "Keymap used when `corfu-mode' is active.")
+
 (defvar-keymap corfu-map
-  :doc "Corfu keymap used when popup is shown."
+  :doc "Keymap used when popup is shown."
   "<remap> <move-beginning-of-line>" #'corfu-prompt-beginning
   "<remap> <move-end-of-line>" #'corfu-prompt-end
   "<remap> <beginning-of-buffer>" #'corfu-first
@@ -1232,7 +1235,7 @@ Quit if no candidate is selected."
 ;;;###autoload
 (define-minor-mode corfu-mode
   "COmpletion in Region FUnction."
-  :global nil :group 'corfu
+  :group 'corfu :keymap corfu-mode-map
   (cond
    (corfu-mode
     ;; FIXME: Install advice which fixes `completion--capf-wrapper', such that