branch: externals/cm-mode
commit cee76357d291b25236744d21891f82b67905cf90
Author: Joost Kremers <[email protected]>
Commit: Joost Kremers <[email protected]>

    Split faces into separate customization group.
    
    Also add markdown as a parent group.
---
 cm-mode.el | 19 +++++++++++++------
 1 file changed, 13 insertions(+), 6 deletions(-)

diff --git a/cm-mode.el b/cm-mode.el
index 34c5bc6a19..a46fdf3253 100644
--- a/cm-mode.el
+++ b/cm-mode.el
@@ -110,7 +110,14 @@ flag to indicate this. (Though they should actually use 
the macro
   "Overlay marking the current highlight.")
 (make-variable-buffer-local 'cm-current-markup-overlay)
 
-(defgroup criticmarkup nil "Minor mode for CriticMarkup." :group 'wp)
+(defgroup criticmarkup nil "Minor mode for CriticMarkup."
+  :prefix "cm-"
+  :group 'wp
+  :group 'markdown)
+
+(defgroup criticmarkup-faces nil "Faces for CriticMarkup."
+  :prefix "cm-"
+  :group 'criticmarkup)
 
 (defcustom cm-auto-comment nil
   "*Comment that is automatically inserted when marking a change."
@@ -122,23 +129,23 @@ flag to indicate this. (Though they should actually use 
the macro
 
 (defface cm-addition-face '((t (:foreground "green")))
   "*Face for CriticMarkup additions."
-  :group 'criticmarkup)
+  :group 'criticmarkup-faces)
 
 (defface cm-deletion-face '((t (:foreground "red")))
   "*Face for CriticMarkup deletions."
-  :group 'criticmarkup)
+  :group 'criticmarkup-faces)
 
 (defface cm-substitution-face '((t (:foreground "orange")))
   "*Face for CriticMarkup substitutions."
-  :group 'criticmarkup)
+  :group 'criticmarkup-faces)
 
 (defface cm-comment-face '((t (:foreground "blue")))
   "*Face for CriticMarkup comments."
-  :group 'criticmarkup)
+  :group 'criticmarkup-faces)
 
 (defface cm-highlight-face '((t (:foreground "magenta")))
   "*Face for CriticMarkup highlights."
-  :group 'criticmarkup)
+  :group 'criticmarkup-faces)
 
 (defvar cm-addition-face 'cm-addition-face
   "CriticMarkup addition face.")

Reply via email to