From 112d0191be18b474c750664f683e17c9e919d020 Mon Sep 17 00:00:00 2001 From: Juraj Hercek Date: Sun, 23 Dec 2007 00:10:39 +0100 Subject: Adjusted thermal monitor. - Thermal monitor can handle more thermal zones now darcs-hash:20071222231039-f49a6-0a8a2f7d575f7e82adbd9b3ee261d046e616dc07.gz --- Plugins/Monitors.hs | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'Plugins/Monitors.hs') 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 -- cgit v1.2.3