From: Mauro Aranda <maurooaranda@gmail.com>
Date: Wed, 4 Oct 2023 13:47:51 +0000 (-0300)
Subject: Fix pulse-flag :type
X-Git-Tag: emacs-29.1.90~29
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3216cd96952c5fa0fbe665ef219210c9ebaf4e75;p=emacs.git

Fix pulse-flag :type

* lisp/cedet/pulse.el (pulse-flag): Expand :type to allow 'never as
value.  (Bug#66341)
---

diff --git a/lisp/cedet/pulse.el b/lisp/cedet/pulse.el
index 37b41fbe8c3..38ccf5b975f 100644
--- a/lisp/cedet/pulse.el
+++ b/lisp/cedet/pulse.el
@@ -71,7 +71,9 @@ Any other value means to do the default pulsing behavior.
 If `pulse-flag' is non-nil, but `pulse-available-p' is nil, then
 this flag is ignored."
   :group 'pulse
-  :type 'boolean)
+  :type '(choice (const :tag "Highlight with unchanging color" nil)
+                 (const :tag "No highlight" never)
+                 (other :tag "Pulse" t)))
 
 (defface pulse-highlight-start-face
   '((((class color) (background dark))