[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/company 42ede0f 1/2: Allow Control quick-access modifie
From: |
ELPA Syncer |
Subject: |
[elpa] externals/company 42ede0f 1/2: Allow Control quick-access modifier key |
Date: |
Mon, 2 Aug 2021 09:57:09 -0400 (EDT) |
branch: externals/company
commit 42ede0fadd023ffa8155ed736098aa84c6ccf048
Author: YE <yet@ego.team>
Commit: YE <yet@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)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/company 42ede0f 1/2: Allow Control quick-access modifier key,
ELPA Syncer <=