branch: externals/company
commit 42ede0fadd023ffa8155ed736098aa84c6ccf048
Author: YE <y...@ego.team>
Commit: YE <y...@ego.team>
Allow Control quick-access modifier key
---
company.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/company.el b/company.el
index dd15fb5..afb0c76 100644
--- a/company.el
+++ b/company.el
@@ -692,7 +692,8 @@ See `company-quick-access-keys' for more details."
:set #'company-custom--set-quick-access
:type '(choice (const :tag "Meta key" meta)
(const :tag "Super key" super)
- (const :tag "Hyper key" hyper))
+ (const :tag "Hyper key" hyper)
+ (const :tag "Control key" control))
:package-version '(company . "0.9.14"))
(defun company-keymap--quick-access-modifier ()
@@ -700,7 +701,8 @@ See `company-quick-access-keys' for more details."
(if-let ((modifier (assoc-default company-quick-access-modifier
'((meta . "M")
(super . "s")
- (hyper . "H")))))
+ (hyper . "H")
+ (control . "C")))))
modifier
(warn "company-quick-access-modifier value unknown: %S"
company-quick-access-modifier)
