emacs-diffs
[Top][All Lists]
Advanced

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

master 632cc76fb58: Allow using pulse.el with a single color without pul


From: Eli Zaretskii
Subject: master 632cc76fb58: Allow using pulse.el with a single color without pulsation
Date: Sat, 24 Aug 2024 04:39:29 -0400 (EDT)

branch: master
commit 632cc76fb58a6d07ed55bbef650d0c6bc1edb475
Author: Gautier Ponsinet <gautier@gautierponsinet.xyz>
Commit: Eli Zaretskii <eliz@gnu.org>

    Allow using pulse.el with a single color without pulsation
    
    * lisp/cedet/pulse.el (pulse-momentary-highlight-overlay): Add
    the start color to the list of colors used for the pulsation
    effect, to allow its use when 'pulse-iterations' is 1.
    (Bug#72636)
---
 lisp/cedet/pulse.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/cedet/pulse.el b/lisp/cedet/pulse.el
index d9f6a40865a..53256ba3a81 100644
--- a/lisp/cedet/pulse.el
+++ b/lisp/cedet/pulse.el
@@ -158,7 +158,7 @@ Optional argument FACE specifies the face to do the 
highlighting."
                      (face-background 'pulse-highlight-face nil 'default)))
              (stop (color-name-to-rgb (face-background 'default)))
              (colors (mapcar (apply-partially 'apply 'color-rgb-to-hex)
-                             (color-gradient start stop pulse-iterations))))
+                             (cons start (color-gradient start stop (1- 
pulse-iterations))))))
         (setq pulse-momentary-timer
               (run-with-timer 0 pulse-delay #'pulse-tick
                               colors



reply via email to

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