[elpa] externals/jinx b82dc4e123: Add jinx-faces customization group

[ELPA Syncer]

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

    Add jinx-faces customization group
---
 CHANGELOG.org |  1 +
 jinx.el       | 59 +++++++++++++++++++++++++++++++++--------------------------
 2 files changed, 34 insertions(+), 26 deletions(-)

diff --git a/CHANGELOG.org b/CHANGELOG.org
index 4a1b1f2730..928fd5cb8d 100644
--- a/CHANGELOG.org
+++ b/CHANGELOG.org
@@ -7,6 +7,7 @@
 - =jinx-correct=: Consistently move backward to the previous misspelling. In 
order
   to move backward further, press =M-$= again (or =M-p=). Move forward with 
=M-n=.
 - =jinx-correct-select=: Support more than 10 quick keys.
+- Add =jinx-faces= customization group.
 
 * Version 0.7 (2023-04-21)
 
diff --git a/jinx.el b/jinx.el
index 2c75dfe5b4..e940b8f70d 100644
--- a/jinx.el
+++ b/jinx.el
@@ -70,32 +70,6 @@
   "Idle timer delay."
   :type 'float)
 
-(defface jinx-misspelled
-  '((((class color) (min-colors 88) (background dark)
-      (supports :underline (:style wave)))
-     :underline (:style wave :color "#d2b580"))
-    (((class color) (min-colors 88) (background light)
-      (supports :underline (:style wave)))
-     :underline (:style wave :color "#5f4400"))
-    (t :underline t :inherit error))
-  "Face used for misspelled words.")
-
-(defface jinx-highlight
-  '((t :inherit isearch))
-  "Face used to highlight current misspelling during correction.")
-
-(defface jinx-accept
-  '((t :inherit font-lock-builtin-face))
-  "Face used for the accept action during correction.")
-
-(defface jinx-key
-  '((t :inherit completions-annotations))
-  "Face used for the select key during correction.")
-
-(defface jinx-annotation
-  '((t :inherit completions-annotations))
-  "Face used for the annotation during correction.")
-
 (defcustom jinx-languages
   (replace-regexp-in-string
    "\\..*\\'" ""
@@ -189,6 +163,39 @@ checking."
 ;;;###autoload
 (put 'jinx-local-words 'safe-local-variable #'stringp)
 
+;;;; Faces
+
+(defgroup jinx-faces nil
+  "Faces used by Jinx."
+  :group 'jinx
+  :group 'faces)
+
+(defface jinx-misspelled
+  '((((class color) (min-colors 88) (background dark)
+      (supports :underline (:style wave)))
+     :underline (:style wave :color "#d2b580"))
+    (((class color) (min-colors 88) (background light)
+      (supports :underline (:style wave)))
+     :underline (:style wave :color "#5f4400"))
+    (t :underline t :inherit error))
+  "Face used for misspelled words.")
+
+(defface jinx-highlight
+  '((t :inherit isearch))
+  "Face used to highlight current misspelling during correction.")
+
+(defface jinx-accept
+  '((t :inherit font-lock-builtin-face))
+  "Face used for the accept action during correction.")
+
+(defface jinx-key
+  '((t :inherit completions-annotations))
+  "Face used for the select key during correction.")
+
+(defface jinx-annotation
+  '((t :inherit completions-annotations))
+  "Face used for the annotation during correction.")
+
 ;;;; Keymaps
 
 (defvar-keymap jinx-misspelled-map