feat(tools/emacs): Title the TVL window correctly
This commit is contained in:
parent
e90e3153f8
commit
e3864f3b85
1 changed files with 5 additions and 0 deletions
|
@ -108,6 +108,11 @@
|
|||
title))
|
||||
(format "IRCCloud<%s>" title))
|
||||
|
||||
;; The Virus Lounge should be, well ...
|
||||
(`("Google-chrome"
|
||||
,(and (pred (lambda (title) (s-contains? "Meet - mng-biyw-xbb" title))) title))
|
||||
"The Virus Lounge")
|
||||
|
||||
;; For other Chrome windows, make the title shorter.
|
||||
(`("Google-chrome" ,title)
|
||||
(format "Chrome<%s>" (s-truncate 42 (s-chop-suffix " - Google Chrome" title))))
|
||||
|
|
Loading…
Reference in a new issue