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

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

[elpa] master 22b4ff0 32/78: Define new face avy-goto-char-timer-face fo


From: Oleh Krehel
Subject: [elpa] master 22b4ff0 32/78: Define new face avy-goto-char-timer-face for the highlights
Date: Sat, 23 Jan 2016 13:59:53 +0000

branch: master
commit 22b4ff065814b4344050aa0627307f097044f5ca
Author: Tassilo Horn <address@hidden>
Commit: Tassilo Horn <address@hidden>

    Define new face avy-goto-char-timer-face for the highlights
---
 avy.el |    6 +++++-
 1 files changed, 5 insertions(+), 1 deletions(-)

diff --git a/avy.el b/avy.el
index 1ae6a1f..b0b038f 100644
--- a/avy.el
+++ b/avy.el
@@ -185,6 +185,10 @@ For example, to make SPC do the same as ?a, use
   '((t (:foreground "gray40")))
   "Face for whole window background during selection.")
 
+(defface avy-goto-char-timer-face
+  '((t (:inherit highlight)))
+  "Face for matches during reading chars using `avy-goto-char-timer'.")
+
 (defconst avy-lead-faces '(avy-lead-face
                            avy-lead-face-0
                            avy-lead-face-2
@@ -1077,7 +1081,7 @@ read string immediately instead of waiting for another 
char for
                   (let ((ov (make-overlay (match-beginning 0) (match-end 0))))
                     (push ov overlays)
                     (overlay-put ov 'window (selected-window))
-                    (overlay-put ov 'face 'avy-lead-face))))))
+                    (overlay-put ov 'face 'avy-goto-char-timer-face))))))
           str)
       (dolist (ov overlays)
         (delete-overlay ov)))))



reply via email to

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