From 28ea8d95137131e81c836ed2d446f8925518e85c Mon Sep 17 00:00:00 2001 From: Sibi Prabakaran Date: Sat, 20 Jun 2020 21:39:02 +0530 Subject: Update based on feedback on the PR --- src/Xmobar/Plugins/Monitors/Cpu.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'src/Xmobar/Plugins/Monitors/Cpu.hs') diff --git a/src/Xmobar/Plugins/Monitors/Cpu.hs b/src/Xmobar/Plugins/Monitors/Cpu.hs index 7f05663..895eeb3 100644 --- a/src/Xmobar/Plugins/Monitors/Cpu.hs +++ b/src/Xmobar/Plugins/Monitors/Cpu.hs @@ -145,7 +145,7 @@ data Field = Field { data ShouldCompute = Compute | Skip deriving (Eq, Ord, Show) -formatField :: PureConfig -> CpuOpts -> CpuData -> Field -> IO String +formatField :: MonitorConfig -> CpuOpts -> CpuData -> Field -> IO String formatField cpuParams cpuOpts cpuInfo@CpuData {..} Field {..} | fieldName == barField = if fieldCompute == Compute @@ -203,7 +203,7 @@ optimizeAllTemplate args@CpuArguments {..} = data CpuArguments = CpuArguments { cpuDataRef :: !CpuDataRef - , cpuParams :: !PureConfig + , cpuParams :: !MonitorConfig , cpuArgs :: ![String] , cpuOpts :: !CpuOpts , cpuInputTemplate :: ![(String, String, String)] -- [("Cpu: ","total","% "),("","user","%")] @@ -217,7 +217,7 @@ getArguments cpuArgs = do initCpuData <- cpuData cpuDataRef <- newIORef initCpuData void $ parseCpu cpuDataRef - cpuParams <- computePureConfig cpuArgs cpuConfig + cpuParams <- computeMonitorConfig cpuArgs cpuConfig cpuInputTemplate <- runTemplateParser cpuParams cpuAllTemplate <- runExportParser (pExport cpuParams) nonOptions <- -- cgit v1.2.3