diff options
| author | Felix Springer <felixspringer149@gmail.com> | 2019-07-12 01:29:28 +0200 |
|---|---|---|
| committer | Felix Springer <felixspringer149@gmail.com> | 2019-07-12 01:29:28 +0200 |
| commit | 95a94efccd1414235d16708be20c9e10f8f7db82 (patch) | |
| tree | 25c18e798400e4c857a5adda38adf1537c3dbcbf /src/Xmobar/Plugins/Monitors | |
| parent | de4869cdc4bf41b0913c16c0693948921df5b224 (diff) | |
| download | xmobar-95a94efccd1414235d16708be20c9e10f8f7db82.tar.gz xmobar-95a94efccd1414235d16708be20c9e10f8f7db82.tar.bz2 | |
moved CoreTemp to MultiCoreTemp
Diffstat (limited to 'src/Xmobar/Plugins/Monitors')
| -rw-r--r-- | src/Xmobar/Plugins/Monitors/MultiCoreTemp.hs (renamed from src/Xmobar/Plugins/Monitors/CoreTemp.hs) | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/src/Xmobar/Plugins/Monitors/CoreTemp.hs b/src/Xmobar/Plugins/Monitors/MultiCoreTemp.hs index 7a6bdfd..b0325dc 100644 --- a/src/Xmobar/Plugins/Monitors/CoreTemp.hs +++ b/src/Xmobar/Plugins/Monitors/MultiCoreTemp.hs @@ -1,6 +1,6 @@ ----------------------------------------------------------------------------- -- | --- Module : Plugins.Monitors.CoreTemp +-- Module : Plugins.Monitors.MultiCoreTemp -- Copyright : (c) 2019 Felix Springer -- License : BSD-style (see LICENSE) -- @@ -12,7 +12,7 @@ -- ----------------------------------------------------------------------------- -module Xmobar.Plugins.Monitors.CoreTemp (startCoreTemp) where +module Xmobar.Plugins.Monitors.MultiCoreTemp (startMultiCoreTemp) where import Xmobar.Plugins.Monitors.Common import Control.Monad (filterM) @@ -23,9 +23,9 @@ import System.Directory ( doesDirectoryExist -- | Declare Options. data CTOpts = CTOpts { loadIconPattern :: Maybe IconPattern - , mintemp :: Float - , maxtemp :: Float - } + , mintemp :: Float + , maxtemp :: Float + } -- | Set default Options. defaultOpts :: CTOpts @@ -154,5 +154,5 @@ runCT argv = do cTs <- io parseCT l <- formatCT opts cTs parseTemplate l -startCoreTemp :: [String] -> Int -> (String -> IO ()) -> IO () -startCoreTemp a = runM a cTConfig runCT +startMultiCoreTemp :: [String] -> Int -> (String -> IO ()) -> IO () +startMultiCoreTemp a = runM a cTConfig runCT |