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

[taffybar] Better padding styling

Browse Source
This commit is contained in:
Ivan Malison 2018-05-17 15:06:58 -07:00
parent 3f8afe40d9
commit 4d9ea9acbe
No known key found for this signature in database
GPG Key ID: 62530EFBE99DC2F8
3 changed files with 10 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
dotfiles/config/taffybar/taffybar

@ -1 +1 @@
Subproject commit 6b1f3732ce5af9c8383585ad277c9866d459c9f4
Subproject commit 441f16f381c66e22d95054a605ebc348012b93ad

7
dotfiles/config/taffybar/taffybar.css
View File

@ -25,6 +25,13 @@
}
.InnerPad {
padding-bottom: 12px;
padding-top: 12px;
padding-left: 4px;
padding-right: 4px;
}
.Workspaces .InnerPad {
padding-bottom: 5px;
padding-top: 5px;
padding-left: 2px;

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

@ -137,7 +137,6 @@ main = do
case res of
IINone -> IIFilePath $ inResourcesDirectory "exe-icon.png"
_ -> res
clock = textClockNew Nothing "%a %b %_d %r" 1
cpu = pollingGraphNew cpuCfg 0.5 cpuCallback
mem = pollingGraphNew memCfg 1 memCallback
layout = layoutNew defaultLayoutConfig
@ -158,12 +157,12 @@ main = do
workspaces = workspacesNew myWorkspacesConfig
baseConfig = defaultSimpleTaffyConfig
{ startWidgets =
[ workspaces
[ flip widgetSetClass "Workspaces" =<< workspaces
, layout >>= buildPadBox
, windows >>= buildPadBox
]
, endWidgets = map (>>= buildPadBox)
[ clock >>= setMinWidth 200
[ textClockNew Nothing "%a %b %_d %r" 1
, textBatteryNew "$percentage$% ($time$)"
, batteryIconNew
, sniTrayNew