emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] master 1bb48ae 376/399: swiper.el: Add :group for faces


From: Oleh Krehel
Subject: [elpa] master 1bb48ae 376/399: swiper.el: Add :group for faces
Date: Sat, 20 Jul 2019 14:58:03 -0400 (EDT)

branch: master
commit 1bb48ae0ef2642748c113c2d607a942d4cb0bdf1
Author: Oleh Krehel <address@hidden>
Commit: Oleh Krehel <address@hidden>

    swiper.el: Add :group for faces
    
    Re #2135
---
 counsel.el |  4 ++--
 swiper.el  | 27 ++++++++++++++++++---------
 2 files changed, 20 insertions(+), 11 deletions(-)

diff --git a/counsel.el b/counsel.el
index 826462a..9d49719 100644
--- a/counsel.el
+++ b/counsel.el
@@ -647,7 +647,6 @@ X is an item of a radio- or choice-type defcustom."
 (declare-function lv-delete-window "ext:lv")
 (declare-function custom-variable-documentation "cus-edit")
 
-;;;###autoload
 (defface counsel-variable-documentation
   '((t :inherit font-lock-comment-face))
   "Face for displaying Lisp documentation."
@@ -3591,7 +3590,8 @@ This variable has no effect unless
 ;;** `counsel-mark-ring'
 (defface counsel--mark-ring-highlight
   '((t (:inherit highlight)))
-  "Face for current `counsel-mark-ring' line.")
+  "Face for current `counsel-mark-ring' line."
+  :group 'ivy-faces)
 
 (defvar counsel--mark-ring-overray nil
   "Intarnal overray to highlight line by candidate of `counsel-mark-ring'.")
diff --git a/swiper.el b/swiper.el
index f13ea28..d3d19f9 100644
--- a/swiper.el
+++ b/swiper.el
@@ -43,39 +43,48 @@
 
 (defface swiper-match-face-1
   '((t (:inherit lazy-highlight)))
-  "The background face for `swiper' matches.")
+  "The background face for `swiper' matches."
+  :group 'ivy-faces)
 
 (defface swiper-match-face-2
   '((t (:inherit isearch)))
-  "Face for `swiper' matches modulo 1.")
+  "Face for `swiper' matches modulo 1."
+  :group 'ivy-faces)
 
 (defface swiper-match-face-3
   '((t (:inherit match)))
-  "Face for `swiper' matches modulo 2.")
+  "Face for `swiper' matches modulo 2."
+  :group 'ivy-faces)
 
 (defface swiper-match-face-4
   '((t (:inherit isearch-fail)))
-  "Face for `swiper' matches modulo 3.")
+  "Face for `swiper' matches modulo 3."
+  :group 'ivy-faces)
 
 (defface swiper-background-match-face-1
   '((t (:inherit swiper-match-face-1)))
-  "The background face for non-current `swiper' matches.")
+  "The background face for non-current `swiper' matches."
+  :group 'ivy-faces)
 
 (defface swiper-background-match-face-2
   '((t (:inherit swiper-match-face-2)))
-  "Face for non-current `swiper' matches modulo 1.")
+  "Face for non-current `swiper' matches modulo 1."
+  :group 'ivy-faces)
 
 (defface swiper-background-match-face-3
   '((t (:inherit swiper-match-face-3)))
-  "Face for non-current `swiper' matches modulo 2.")
+  "Face for non-current `swiper' matches modulo 2."
+  :group 'ivy-faces)
 
 (defface swiper-background-match-face-4
   '((t (:inherit swiper-match-face-4)))
-  "Face for non-current `swiper' matches modulo 3.")
+  "Face for non-current `swiper' matches modulo 3."
+  :group 'ivy-faces)
 
 (defface swiper-line-face
   '((t (:inherit highlight)))
-  "Face for current `swiper' line.")
+  "Face for current `swiper' line."
+  :group 'ivy-faces)
 
 (defcustom swiper-faces '(swiper-match-face-1
                           swiper-match-face-2



reply via email to

[Prev in Thread] Current Thread [Next in Thread]