branch: elpa/popup
commit 581f35b9322b9167c561ada5bb3c8560467bd124
Author: Takafumi Arakaki <aka....@gmail.com>
Commit: Takafumi Arakaki <aka....@gmail.com>

    Define popup-menu-summary-face
---
 popup.el | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/popup.el b/popup.el
index 84b2e8a..9aae503 100644
--- a/popup.el
+++ b/popup.el
@@ -1059,6 +1059,11 @@ PROMPT is a prompt string when reading events during 
event loop."
   "Face for popup menu selection."
   :group 'popup)
 
+(defface popup-menu-summary-face
+  '((t (:background "lightgray" :foreground "dimgray")))
+  "Face for popup summary."
+  :group 'popup)
+
 (defvar popup-menu-show-tip-function 'popup-tip
   "Function used for showing tooltip by `popup-menu-show-quick-help'.")
 
@@ -1269,6 +1274,7 @@ isearch canceled. The arguments is whole filtered list of 
items."
                            :face 'popup-menu-face
                            :mouse-face 'popup-menu-mouse-face
                            :selection-face 'popup-menu-selection-face
+                           :summary-face 'popup-menu-summary-face
                            :margin-left margin-left
                            :margin-right margin-right
                            :scroll-bar scroll-bar

Reply via email to