[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
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 632cc76fb58: Allow using pulse.el with a single color without pulsation,
Eli Zaretskii <=