diff options
| author | Lars Ingebrigtsen <larsi@gnus.org> | 2021-06-13 15:38:52 +0200 |
|---|---|---|
| committer | Lars Ingebrigtsen <larsi@gnus.org> | 2021-06-13 15:38:52 +0200 |
| commit | 2f7a115a9c876e69296974e8e02ece569df988e9 (patch) | |
| tree | f538dee36cdeb0521fc83797cded23c15c71cc2d /lisp/cedet/pulse.el | |
| parent | 55d7effbe1d8edae94ec9ebcd061cd2221df97e4 (diff) | |
| download | emacs-2f7a115a9c876e69296974e8e02ece569df988e9.tar.gz | |
Fix previous pulse.el fix
* lisp/cedet/pulse.el (pulse-reset-face): Fix up previous
pulse-reset-face change -- reset back to the start face
(bug#48936).
Diffstat (limited to 'lisp/cedet/pulse.el')
| -rw-r--r-- | lisp/cedet/pulse.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/cedet/pulse.el b/lisp/cedet/pulse.el index 54b14c67ed1..7928fa1bf42 100644 --- a/lisp/cedet/pulse.el +++ b/lisp/cedet/pulse.el @@ -121,9 +121,8 @@ Face used for temporary highlighting of tags for effect." (face-background 'pulse-highlight-start-face) )) (set-face-extend 'pulse-highlight-face - ;; If there's a face, use the :extend from that. - ;; Otherwise, set it to nil. - (and face (face-extend-p face nil t))) + (face-extend-p (or face 'pulse-highlight-start-face) + nil t)) (put 'pulse-highlight-face :startface (or face 'pulse-highlight-start-face)) (setq pulse-momentary-iteration 0)) |