[taffybar] Add github widget updates

This commit is contained in:
Ivan Malison 2018-05-10 16:05:50 -07:00
parent 3d7049e2b5
commit 327de8a5b4
No known key found for this signature in database
GPG Key ID: 62530EFBE99DC2F8
2 changed files with 5 additions and 4 deletions

@ -1 +1 @@
Subproject commit ca3aa9e528e92a1eb248f8632b4e5db0b640b947 Subproject commit d1766409bc4c1e9faa1d869eb928144dad443250

View File

@ -45,6 +45,7 @@ import System.Taffybar.Information.X11DesktopInfo
import System.Taffybar.SimpleConfig import System.Taffybar.SimpleConfig
import System.Taffybar.Widget import System.Taffybar.Widget
import System.Taffybar.Widget.Generic.PollingGraph import System.Taffybar.Widget.Generic.PollingGraph
import System.Taffybar.Widget.Generic.PollingLabel
import System.Taffybar.Widget.Workspaces import System.Taffybar.Widget.Workspaces
import Text.Printf import Text.Printf
import Text.Read hiding (lift) import Text.Read hiding (lift)
@ -229,14 +230,14 @@ main = do
, wnd >>= buildPadBox , wnd >>= buildPadBox
] ]
, endWidgets = map (>>= buildPadBoxNoShrink) , endWidgets = map (>>= buildPadBoxNoShrink)
[ clock >>= setMinWidth 200 [ battery
, clock >>= setMinWidth 200
, sniTrayNew , sniTrayNew
, github , github
, battery
, cpu , cpu
, mem , mem
, netMonitorGraphNew netCfg Nothing , netMonitorGraphNew netCfg Nothing
, networkMonitorNew defaultNetFormat Nothing >>= setMinWidth 200 -- , networkMonitorNew defaultNetFormat Nothing >>= setMinWidth 200
, fsMonitorNew 60 ["/dev/sdd2"] , fsMonitorNew 60 ["/dev/sdd2"]
, mpris , mpris
] ]