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

This commit is contained in:
2019-04-10 16:37:37 -07:00
2 changed files with 10 additions and 6 deletions

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 = []