mdebray/tvl-depot
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

feat(tools/emacs): Title the TVL window correctly

Browse source
This commit is contained in:
Vincent Ambo 2020-04-04 22:27:06 +01:00
parent e90e3153f8
commit e3864f3b85
1 changed files with 5 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
tools/emacs/config/desktop.el
View file

@ -108,6 +108,11 @@
title)) title))
(format "IRCCloud<%s>" 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. ;; For other Chrome windows, make the title shorter.
(`("Google-chrome" ,title) (`("Google-chrome" ,title)
(format "Chrome<%s>" (s-truncate 42 (s-chop-suffix " - Google Chrome" title)))) (format "Chrome<%s>" (s-truncate 42 (s-chop-suffix " - Google Chrome" title))))