wgester/dotfiles
1
0
Fork 0
forked from colonelpanic/dotfiles
Code Pull Requests Activity

[taffybar] Fix config

Browse Source
This commit is contained in:
Ivan Malison 2021-08-14 04:24:25 -06:00
parent eb18e13bf2
commit cf22173bee
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
dotfiles/config/taffybar/taffybar.hs
View File

@ -134,8 +134,8 @@ cssFilesByHostname =
main = do main = do
hostName <- getHostName hostName <- getHostName
homeDirectory <- getHomeDirectory homeDirectory <- getHomeDirectory
cssFiles <- let relativeFiles = fromMaybe ["gotham.css", "taffybar.css"] $ lookup hostName cssFilesByHostname
traverse (getUserConfigFile "taffybar") $ lookup hostName cssFilesByHostname cssFiles <- mapM (getUserConfigFile "taffybar") relativeFiles
let myCPU = deocrateWithSetClassAndBoxes "cpu" $ let myCPU = deocrateWithSetClassAndBoxes "cpu" $
pollingGraphNew cpuCfg 5 cpuCallback pollingGraphNew cpuCfg 5 cpuCallback