branch: elpa/symbol-overlay commit 1d93f3ad4b382548c6f20f2c59b826767a64b40a Author: 我没有抓狂 <blindingd...@outlook.com> Commit: GitHub <nore...@github.com>
Fix symbol-overlay-rename adding redundant overlay --- symbol-overlay.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/symbol-overlay.el b/symbol-overlay.el index 0bdc051dd9..8aab92bc56 100644 --- a/symbol-overlay.el +++ b/symbol-overlay.el @@ -388,7 +388,8 @@ If KEYWORD is non-nil, remove it then use its color on new overlays." (when symbol-overlay-temp-symbol (symbol-overlay-remove-temp)) (let* ((case-fold-search nil) - (face (or (car (cl-set-difference + (face (or (symbol-overlay-maybe-remove keyword) + (car (cl-set-difference symbol-overlay-faces (mapcar #'cddr symbol-overlay-keywords-alist))) ;; If we have exhausted the available faces, then just