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:
@@ -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))
|
||||
|
||||
Reference in New Issue
Block a user