branch: master
commit 14f80ed7f21d79df6639c7df2a6e61a716c07b81
Author: Dmitry Gutov <dgu...@yandex.ru>
Commit: Dmitry Gutov <dgu...@yandex.ru>
Move face definitions to a separate group
Closes #927
---
NEWS.md | 1 +
company-template.el | 2 +-
company.el | 9 +++++++++
3 files changed, 11 insertions(+), 1 deletion(-)
diff --git a/NEWS.md b/NEWS.md
index 135c9e6..a551f13 100644
--- a/NEWS.md
+++ b/NEWS.md
@@ -2,6 +2,7 @@
## Next
+* Face definitions have moved to a separate group: `company-faces`.
* `company-capf`'s `:exit-function` handling has been improved
([#935](https://github.com/company-mode/company-mode/issues/935)).
* New user option `company-clang-use-compile-flags-txt`
diff --git a/company-template.el b/company-template.el
index 7db50dd..be4c41f 100644
--- a/company-template.el
+++ b/company-template.el
@@ -27,7 +27,7 @@
'((((background dark)) (:background "yellow" :foreground "black"))
(((background light)) (:background "orange" :foreground "black")))
"Face used for editable text in template fields."
- :group 'company)
+ :group 'company-faces)
(defvar company-template-forward-field-item
'(menu-item "" company-template-forward-field
diff --git a/company.el b/company.el
index 48c41c1..82223fb 100644
--- a/company.el
+++ b/company.el
@@ -84,6 +84,11 @@ attention to case differences."
:group 'convenience
:group 'matching)
+(defgroup company-faces nil
+ "Faces used by Company."
+ :group 'company
+ :group 'faces)
+
(defface company-tooltip
'((default :foreground "black")
(((class color) (min-colors 88) (background light))
@@ -180,6 +185,10 @@ attention to case differences."
(((background light)) (:background "firebrick4")))
"Face used for the common part of completions in the echo area.")
+;; Too lazy to re-add :group to all defcustoms down below.
+(setcdr (assoc load-file-name custom-current-group-alist)
+ 'company)
+
(defun company-frontends-set (variable value)
;; Uniquify.
(let ((value (delete-dups (copy-sequence value))))
