diff options
| author | Stefan Kangas | 2025-01-27 06:19:34 +0100 |
|---|---|---|
| committer | Stefan Kangas | 2025-01-27 06:22:23 +0100 |
| commit | 2b3599bb08e8ccfe49bbaa28693fed8dca62440b (patch) | |
| tree | afb6e39bd9ebca19715f7a0a6ae48a758501d2f5 | |
| parent | 8d11871c63e65459fd14f1cbe08bf0460c452ac6 (diff) | |
| download | emacs-2b3599bb08e8ccfe49bbaa28693fed8dca62440b.tar.gz emacs-2b3599bb08e8ccfe49bbaa28693fed8dca62440b.zip | |
Don't use obsolete variables in semantic/idle.el
* lisp/cedet/semantic/idle.el
(semantic-idle-symbol-maybe-highlight)
(semantic-idle-local-symbol-highlight): Don't use obsolete variable
'semantic-idle-symbol-highlight-face'.
| -rw-r--r-- | lisp/cedet/semantic/idle.el | 16 |
1 files changed, 6 insertions, 10 deletions
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." | |||
| 820 | (point) (get-buffer-window (current-buffer) 'visible)) | 820 | (point) (get-buffer-window (current-buffer) 'visible)) |
| 821 | (if (< (overlay-end region) (line-end-position)) | 821 | (if (< (overlay-end region) (line-end-position)) |
| 822 | (pulse-momentary-highlight-overlay | 822 | (pulse-momentary-highlight-overlay |
| 823 | region semantic-idle-symbol-highlight-face) | 823 | region semantic-idle-symbol-highlight) |
| 824 | ;; Not the same | 824 | ;; Not the same |
| 825 | (pulse-momentary-highlight-region | 825 | (pulse-momentary-highlight-region |
| 826 | (overlay-start region) | 826 | (overlay-start region) |
| 827 | (line-end-position) | 827 | (line-end-position) |
| 828 | semantic-idle-symbol-highlight-face)))) | 828 | semantic-idle-symbol-highlight)))))) |
| 829 | )) | ||
| 830 | ((vectorp region) | 829 | ((vectorp region) |
| 831 | (let ((start (aref region 0)) | 830 | (let ((start (aref region 0)) |
| 832 | (end (aref region 1))) | 831 | (end (aref region 1))) |
| @@ -845,8 +844,7 @@ visible, then highlight it." | |||
| 845 | (pulse-momentary-highlight-region | 844 | (pulse-momentary-highlight-region |
| 846 | start (if (<= end (line-end-position)) end | 845 | start (if (<= end (line-end-position)) end |
| 847 | (line-end-position)) | 846 | (line-end-position)) |
| 848 | semantic-idle-symbol-highlight-face))) | 847 | semantic-idle-symbol-highlight))))))) |
| 849 | )))) | ||
| 850 | nil)) | 848 | nil)) |
| 851 | 849 | ||
| 852 | (define-semantic-idle-service semantic-idle-local-symbol-highlight | 850 | (define-semantic-idle-service semantic-idle-local-symbol-highlight |
| @@ -876,12 +874,10 @@ Call `semantic-symref-hits-in-region' to identify local references." | |||
| 876 | target (lambda (start end _prefix) | 874 | target (lambda (start end _prefix) |
| 877 | (when (/= start (car Hbounds)) | 875 | (when (/= start (car Hbounds)) |
| 878 | (pulse-momentary-highlight-region | 876 | (pulse-momentary-highlight-region |
| 879 | start end semantic-idle-symbol-highlight-face)) | 877 | start end semantic-idle-symbol-highlight)) |
| 880 | (semantic-throw-on-input 'symref-highlight) | 878 | (semantic-throw-on-input 'symref-highlight)) |
| 881 | ) | ||
| 882 | (semantic-tag-start tag) | 879 | (semantic-tag-start tag) |
| 883 | (semantic-tag-end tag))) | 880 | (semantic-tag-end tag))))))) |
| 884 | )))) | ||
| 885 | 881 | ||
| 886 | 882 | ||
| 887 | ;;;###autoload | 883 | ;;;###autoload |