26 lines
1.9 KiB
Haskell
26 lines
1.9 KiB
Haskell
-- -*- mode: haskell; -*-
|
|
$idle > 60 ==> tag inactive,
|
|
current window $program == ["urxvt", "Konsole"] ==> tag Graph:term,
|
|
current window $program == "emacs" && current window $title =~ /\.py/ ==> tag Graph:code-python,
|
|
current window $program == "emacs" && current window $title =~ /\.hs/ ==> tag Graph:code-haskell,
|
|
current window $program == "emacs" && current window $title =~ /\.rb/ ==> tag Graph:code-ruby,
|
|
current window $program == "emacs" && current window $title =~ /\.js|\.html|\.css/ ==> tag Graph:code-web,
|
|
current window $program == "emacs" && current window $title =~ /\.org|\.md|\.tex|\.txt/ ==> tag Graph:write,
|
|
current window $title =~ [/.*MATLAB.*/, /.*Figure.*/] ==> tag Graph:code-matlab,
|
|
current window $title =~ [m!Facebook!, m!Google+!, m!Twitter!] ==> tag Graph:social,
|
|
current window $title =~ [/.*Hacker News.*/, /.*Less Wrong.*/, /.*reddit.*/, /.*Reddit.*/, /.*GitHub.*/, /.*Ask.fm.*/, /.*Goodreads.*/, /.*Mastodon*/] ==> tag Graph:communities,
|
|
current window $title =~ /.*Ino[Rr]eader.*/ ==> tag Graph:read-rss,
|
|
current window $title =~ /Gmail|mutt|Protonmail/ ==> tag Graph:mail,
|
|
current window $title =~ [m!YouTube!, m!Vimeo!, m!videoplayback!, m!invidious!] ==> tag Graph:tv-web,
|
|
current window $program == ["Navigator", "chromium"] && !(current window $title =~ [m!YouTube!, m!Vimeo!, m!Facebook!, m!Google+!, m!Twitter!, /.*Hacker News.*/, /.*Less Wrong.*/, /.*[Rr]eddit.*/, /.*Goodreads.*/, /.*GitHub.*/, /.*Ask.fm.*/, /.*Ino[Rr]eader.*/, /.*Gmail.*/, /.*New\ Tab.*/]) ==> tag Graph:browsing,
|
|
current window $title =~ [/.*irssi.*/, /.*WeeChat.*/] ==> tag Graph:irc,
|
|
current window $title =~ /.*pdf.*/ ==> tag Graph:read-pdf,
|
|
current window $title =~ /.*djvu.*/ ==> tag Graph:read-djvu,
|
|
current window $title =~ /.*epub.*/ ==> tag Graph:read-epub,
|
|
current window $title =~ /.*mobi.*/ ==> tag Graph:read-mobi,
|
|
current window $title =~ /.*azw3.*/ ==> tag Graph:read-azw3,
|
|
current window $title =~ [m!mp4!, m!mkv!, m!avi!] ==> tag Graph:tv-local
|
|
|
|
|
|
|