* lisp/tab-line.el (tab-line-format): Add face-modified to the cache key.
When tab-line-tab-face-functions contains tab-line-tab-face-modified, add 'buffer-modified-p' status to the cache-key, so the cache will expire when the buffer modification status will change. https://lists.gnu.org/archive/html/emacs-devel/2021-10/msg00129.html
This commit is contained in:
parent
3863919a00
commit
931a7276c0
1 changed files with 4 additions and 1 deletions
|
@ -574,7 +574,10 @@ 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))))
|
||||
(eq (selected-window) (old-selected-window))
|
||||
(and (memq 'tab-line-tab-face-modified
|
||||
tab-line-tab-face-functions)
|
||||
(buffer-file-name) (buffer-modified-p))))
|
||||
(cache (window-parameter nil 'tab-line-cache)))
|
||||
;; Enable auto-hscroll again after it was disabled on manual scrolling.
|
||||
;; The moment to enable it is when the window-buffer was updated.
|
||||
|
|
Loading…
Add table
Reference in a new issue