diff --git a/lisp/cedet/semantic/idle.el b/lisp/cedet/semantic/idle.el index addd94690e7..515a6b439bb 100644 --- a/lisp/cedet/semantic/idle.el +++ b/lisp/cedet/semantic/idle.el @@ -820,13 +820,12 @@ visible, then highlight it." (point) (get-buffer-window (current-buffer) 'visible)) (if (< (overlay-end region) (line-end-position)) (pulse-momentary-highlight-overlay - region semantic-idle-symbol-highlight-face) + region semantic-idle-symbol-highlight) ;; Not the same (pulse-momentary-highlight-region (overlay-start region) (line-end-position) - semantic-idle-symbol-highlight-face)))) - )) + semantic-idle-symbol-highlight)))))) ((vectorp region) (let ((start (aref region 0)) (end (aref region 1))) @@ -845,8 +844,7 @@ visible, then highlight it." (pulse-momentary-highlight-region start (if (<= end (line-end-position)) end (line-end-position)) - semantic-idle-symbol-highlight-face))) - )))) + semantic-idle-symbol-highlight))))))) nil)) (define-semantic-idle-service semantic-idle-local-symbol-highlight @@ -876,12 +874,10 @@ Call `semantic-symref-hits-in-region' to identify local references." target (lambda (start end _prefix) (when (/= start (car Hbounds)) (pulse-momentary-highlight-region - start end semantic-idle-symbol-highlight-face)) - (semantic-throw-on-input 'symref-highlight) - ) + start end semantic-idle-symbol-highlight)) + (semantic-throw-on-input 'symref-highlight)) (semantic-tag-start tag) - (semantic-tag-end tag))) - )))) + (semantic-tag-end tag))))))) ;;;###autoload