diff options
Diffstat (limited to 'Plugins/Monitors.hs')
-rw-r--r-- | Plugins/Monitors.hs | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/Plugins/Monitors.hs b/Plugins/Monitors.hs index 553862b..5be6057 100644 --- a/Plugins/Monitors.hs +++ b/Plugins/Monitors.hs @@ -33,7 +33,7 @@ data Monitors = Weather Station Args Rate | Swap Args Rate | Cpu Args Rate | Battery Args Rate - | Thermal Args Rate + | Thermal Zone Args Rate | CpuFreq Args Rate | CoreTemp Args Rate deriving (Show,Read,Eq) @@ -42,25 +42,26 @@ type Args = [String] type Program = String type Alias = String type Station = String +type Zone = String type Interface = String type Rate = Int instance Exec Monitors where alias (Weather s _ _) = s alias (Network i _ _) = i + alias (Thermal z _ _) = z alias (Memory _ _) = "memory" alias (Swap _ _) = "swap" alias (Cpu _ _) = "cpu" alias (Battery _ _) = "battery" - alias (Thermal _ _) = "thermal" alias (CpuFreq _ _) = "cpufreq" alias (CoreTemp _ _) = "coretemp" start (Weather s a r) = runM (a ++ [s]) weatherConfig runWeather r start (Network i a r) = runM (a ++ [i]) netConfig runNet r + start (Thermal z a r) = runM (a ++ [z]) thermalConfig runThermal r start (Memory a r) = runM a memConfig runMem r start (Swap a r) = runM a swapConfig runSwap r start (Cpu a r) = runM a cpuConfig runCpu r start (Battery a r) = runM a battConfig runBatt r - start (Thermal a r) = runM a thermalConfig runThermal r start (CpuFreq a r) = runM a cpuFreqConfig runCpuFreq r start (CoreTemp a r) = runM a coreTempConfig runCoreTemp r |