Fix face extension in pulse.el
* lisp/cedet/pulse.el (pulse-reset-face): Propagate the :extend attribute of FACE to the face used for displaying the pulse. Reported by Adam Porter <adam@alphapapa.net>.
This commit is contained in:
parent
36c42d2a30
commit
90321f595c
1 changed files with 3 additions and 0 deletions
|
@ -161,6 +161,9 @@ Return t if there is more drift to do, nil if completed."
|
|||
(face-background face nil t)
|
||||
(face-background 'pulse-highlight-start-face)
|
||||
))
|
||||
(and face
|
||||
(set-face-extend 'pulse-highlight-face
|
||||
(face-extend-p face nil t)))
|
||||
(put 'pulse-highlight-face :startface (or face
|
||||
'pulse-highlight-start-face))
|
||||
(put 'pulse-highlight-face :iteration 0))
|
||||
|
|
Loading…
Add table
Reference in a new issue