diff --git a/dotfiles/config/taffybar/taffybar.hs b/dotfiles/config/taffybar/taffybar.hs index 1d5548cc..b9852003 100644 --- a/dotfiles/config/taffybar/taffybar.hs +++ b/dotfiles/config/taffybar/taffybar.hs @@ -107,8 +107,8 @@ logDebug = do handler <- streamHandler stdout DEBUG logger <- getLogger "System.Taffybar" saveGlobalLogger $ setLevel DEBUG logger - infoLogger <- getLogger "System.Information" - saveGlobalLogger $ setLevel DEBUG infoLogger + workspacesLogger <- getLogger "System.Taffybar.Widget.Workspaces" + saveGlobalLogger $ setLevel WARNING workspacesLogger github = do Right (token, _) <- passGet "github-token" @@ -179,7 +179,8 @@ main = do } simpleTaffyConfig = baseConfig - dyreTaffybar $ withLogServer $ withToggleServer $ toTaffyConfig simpleTaffyConfig + dyreTaffybar $ withBatteryRefresh $ withLogServer $ withToggleServer $ + toTaffyConfig simpleTaffyConfig -- Local Variables: -- flycheck-ghc-args: ("-Wno-missing-signatures")