forked from colonelpanic/dotfiles
Merge branch 'master' of github.com:IvanMalison/dotfiles
This commit is contained in:
commit
5acfd38cec
@ -1 +1 @@
|
|||||||
Subproject commit e58efd030328aea6dc808749edcd5a3fabfee3e3
|
Subproject commit 0393c3b01d057855bf927ac279dacc5550c27268
|
@ -165,11 +165,15 @@ main = do
|
|||||||
, barHeight = 30
|
, barHeight = 30
|
||||||
, cssPath = cssFilePath
|
, cssPath = cssFilePath
|
||||||
}
|
}
|
||||||
selectedConfig = fromMaybe baseConfig $
|
selectedConfig =
|
||||||
lookup hostName
|
fromMaybe baseConfig $ lookup hostName
|
||||||
[ ("uber-loaner", baseConfig { endWidgets = shortLaptopEndWidgets } )
|
[ ( "uber-loaner"
|
||||||
, ("imalison-home", baseConfig { endWidgets = fullEndWidgets, barHeight = 42 } )
|
, baseConfig { endWidgets = shortLaptopEndWidgets }
|
||||||
]
|
)
|
||||||
|
, ( "imalison-home"
|
||||||
|
, baseConfig { endWidgets = fullEndWidgets, barHeight = 42 }
|
||||||
|
)
|
||||||
|
]
|
||||||
simpleTaffyConfig = selectedConfig
|
simpleTaffyConfig = selectedConfig
|
||||||
{ centerWidgets = map (>>= buildContentsBox) []
|
{ centerWidgets = map (>>= buildContentsBox) []
|
||||||
, endWidgets = []
|
, endWidgets = []
|
||||||
|
Loading…
Reference in New Issue
Block a user