colonelpanic/dotfiles
1
0
Fork 1
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Merge branch 'master' of github.com:IvanMalison/dotfiles

Browse Source
This commit is contained in:
Ivan Malison 2019-04-10 16:37:37 -07:00
commit 5acfd38cec
No known key found for this signature in database
GPG Key ID: 62530EFBE99DC2F8
2 changed files with 10 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
dotfiles/config/taffybar/taffybar

@ -1 +1 @@
Subproject commit e58efd030328aea6dc808749edcd5a3fabfee3e3
Subproject commit 0393c3b01d057855bf927ac279dacc5550c27268

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

@ -165,11 +165,15 @@ main = do
, barHeight = 30
, cssPath = cssFilePath
}
selectedConfig = fromMaybe baseConfig $
lookup hostName
[ ("uber-loaner", baseConfig { endWidgets = shortLaptopEndWidgets } )
, ("imalison-home", baseConfig { endWidgets = fullEndWidgets, barHeight = 42 } )
]
selectedConfig =
fromMaybe baseConfig $ lookup hostName
[ ( "uber-loaner"
, baseConfig { endWidgets = shortLaptopEndWidgets }
)
, ( "imalison-home"
, baseConfig { endWidgets = fullEndWidgets, barHeight = 42 }
)
]
simpleTaffyConfig = selectedConfig
{ centerWidgets = map (>>= buildContentsBox) []
, endWidgets = []