Inherit popup faces

This makes face customization easier.
tkf · Jan 17, 2013 · 01a4780 · 01a4780
1 parent ddac826
commit 01a4780
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 7 deletions.
diff --git a/auto-complete-config.el b/auto-complete-config.el
@@ -79,12 +79,12 @@
 ;; gtags
 
 (defface ac-gtags-candidate-face
-  '((t (:background "lightgray" :foreground "navy")))
+  '((t (:inherit ac-candidate-face :foreground "navy")))
   "Face for gtags candidate"
   :group 'auto-complete)
 
 (defface ac-gtags-selection-face
-  '((t (:background "navy" :foreground "white")))
+  '((t (:inherit ac-selection-face :background "navy")))
   "Face for the gtags selected candidate."
   :group 'auto-complete)
 
@@ -102,12 +102,13 @@
 ;; yasnippet
 
 (defface ac-yasnippet-candidate-face
-  '((t (:background "sandybrown" :foreground "black")))
+  '((t (:inherit ac-candidate-face
+                 :background "sandybrown" :foreground "black")))
   "Face for yasnippet candidate."
   :group 'auto-complete)
 
 (defface ac-yasnippet-selection-face
-  '((t (:background "coral3" :foreground "white")))
+  '((t (:inherit ac-selection-face :background "coral3")))
   "Face for the yasnippet selected candidate."
   :group 'auto-complete)
 

diff --git a/auto-complete.el b/auto-complete.el
@@ -306,17 +306,17 @@ a prefix doen't contain any upper case letters."
   :group 'auto-complete)
 
 (defface ac-candidate-face
-  '((t (:background "lightgray" :foreground "black")))
+  '((t (:inherit popup-face)))
   "Face for candidate."
   :group 'auto-complete)
 
 (defface ac-candidate-mouse-face
-  '((t (:background "blue" :foreground "white")))
+  '((t (:inherit popup-mouse-face)))
   "Mouse face for candidate."
   :group 'auto-complete)
 
 (defface ac-selection-face
-  '((t (:background "steelblue" :foreground "white")))
+  '((t (:inherit popup-menu-selection-face)))
   "Face for selected candidate."
   :group 'auto-complete)