summaryrefslogtreecommitdiffhomepage
path: root/src/Xmobar/Plugins/Monitors/Load.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Xmobar/Plugins/Monitors/Load.hs')
-rw-r--r--src/Xmobar/Plugins/Monitors/Load.hs6
1 files changed, 2 insertions, 4 deletions
diff --git a/src/Xmobar/Plugins/Monitors/Load.hs b/src/Xmobar/Plugins/Monitors/Load.hs
index 616b673..bc0af09 100644
--- a/src/Xmobar/Plugins/Monitors/Load.hs
+++ b/src/Xmobar/Plugins/Monitors/Load.hs
@@ -22,9 +22,7 @@ import System.Posix.Files (fileExist)
-- | Default configuration.
loadConfig :: IO MConfig
-loadConfig = mkMConfig
- "Load: <load1>" -- template
- ["load1", "load5", "load15"] -- available replacements
+loadConfig = mkMConfig "Load: <load1>" ["load1", "load5", "load15"]
-- | Parses the contents of a loadavg proc file, returning
-- the list of load averages
@@ -43,4 +41,4 @@ runLoad _ = do
d <- getConfigValue decDigits
parseTemplate =<< mapM (showWithColors (showDigits d)) l)
else
- return "Load: N/A"
+ getConfigValue naString