[taffybar] github tweaks
This commit is contained in:
parent
6070f2fe8c
commit
cfac4d1928
@ -1 +1 @@
|
||||
Subproject commit 553c634f36cc66c9d789d789ee9e4e2f81d5e6d5
|
||||
Subproject commit 7ecfcfc1018fa1380656be9cbed908ff05e5c481
|
@ -131,9 +131,7 @@ logDebug = do
|
||||
|
||||
github = do
|
||||
Right (token, _) <- passGet "github-token"
|
||||
githubNotificationsNew GitHubConfig { ghAuth = Auth.OAuth $ BS.pack token
|
||||
, ghIcon = undefined
|
||||
}
|
||||
githubNotificationsNew $ defaultGithubConfig $ Auth.OAuth $ BS.pack token
|
||||
|
||||
main = do
|
||||
interfaceNames <- getInterfaces
|
||||
@ -206,12 +204,12 @@ main = do
|
||||
[ batteryBarNewWithFormat defaultBatteryConfig "$percentage$% ($time$) - $status$" 1.0
|
||||
, makeContents sniTrayNew "Cpu"
|
||||
, makeContents clock "Cpu"
|
||||
, github >>= buildPadBox
|
||||
, makeContents cpu "Cpu"
|
||||
, makeContents mem "Cpu"
|
||||
, makeContents netMonitor "Cpu"
|
||||
, makeContents (fsMonitorNew 60 ["/dev/sdd2"]) "Cpu"
|
||||
, mpris >>= buildPadBox
|
||||
, github >>= buildPadBox
|
||||
]
|
||||
, barPosition = Top
|
||||
, barPadding = 0
|
||||
|
Loading…
Reference in New Issue
Block a user