diff --git a/src/QBar/DefaultConfig.hs b/src/QBar/DefaultConfig.hs index 5c0d61393387e8cefa64fcec035bec1ba8ba27ba..4d353568bdb07a54a9ba536883843e2d74133ce9 100644 --- a/src/QBar/DefaultConfig.hs +++ b/src/QBar/DefaultConfig.hs @@ -18,11 +18,11 @@ generateDefaultBarConfig = do let todo = systemInfoInterval (blockScript $ blockLocation "todo") let wifi = systemInfoInterval (blockScript $ blockLocation "wifi2") >-> modify (addIcon "📡\xFE0E") let networkEnvironment = systemInfoInterval (blockScript $ blockLocation "network-environment") - let cpu = systemInfoInterval (blockScript $ blockLocation "cpu_usage") >-> modify ((blockName?~"cpu") . addIcon "💻\xFE0E") >-> autoPadding + let cpu = systemInfoInterval (blockScript $ blockLocation "cpu_usage") >-> modify ((blockName ?~ "cpu") . addIcon "💻\xFE0E") >-> autoPadding let ram = systemInfoInterval (blockScript $ blockLocation "memory") >-> modify (addIcon "ðŸ\xFE0E") >-> autoPadding let temperature = systemInfoInterval (blockScript $ blockLocation "temperature") >-> autoPadding let volumeBlock = startPersistentBlockScript $ blockLocation "volume-pulseaudio -S -F3" - let battery = systemInfoInterval $ batteryBlock >-> modify (blockName?~"battery") + let battery = systemInfoInterval $ batteryBlock >-> modify (blockName ?~ "battery") addBlock dateBlock addBlock battery