* lisp/tab-line.el (tab-line-format): Use mode-line-window-selected-p.
Recently 'mode-line-window-selected-p' was added to 'tab-line-tab-name-format-default'. Now add the same to another place that handles the face 'tab-line-tab-current' (bug#53629).
This commit is contained in:
parent
64d211179d
commit
a6df8f9f99
1 changed files with 1 additions and 1 deletions
|
@ -591,7 +591,7 @@ For use in `tab-line-tab-face-functions'."
|
|||
;; handle tab-line scrolling
|
||||
(window-parameter nil 'tab-line-hscroll)
|
||||
;; for setting face 'tab-line-tab-current'
|
||||
(eq (selected-window) (old-selected-window))
|
||||
(mode-line-window-selected-p)
|
||||
(and (memq 'tab-line-tab-face-modified
|
||||
tab-line-tab-face-functions)
|
||||
(buffer-file-name) (buffer-modified-p))))
|
||||
|
|
Loading…
Add table
Reference in a new issue