import Xmobar import Config import Monitors -- <fn=2> 💡 </fn> config p = (baseConfig p) { position = TopSize C 100 defaultHeight , textOffset = defaultHeight - 8 , textOffsets = [defaultHeight - 9] , border = BottomB , commands = [ Run (topProc p) , Run (multiCPU p) , Run (cpuFreq p) , Run memory , Run (diskU p) , Run (diskIO p) , Run (coreTemp p) , Run brightness , Run kbd , Run XMonadLog , Run (batt p) ] , template = " |bright| |memory| |top| <fn=2>|kbd|</fn>\ \{|XMonadLog|}\ \ |diskio| |disku| |cpufreq| |multicpu|\ \ |coretemp| \ \ |batt0| " } main :: IO () main = palette >>= configFromArgs . config >>= xmobar