summaryrefslogtreecommitdiffhomepage
path: root/src/Plugins/Monitors/Batt.hs
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2013-10-27 16:20:25 +0100
committerJose Antonio Ortega Ruiz <jao@gnu.org>2013-10-27 16:20:25 +0100
commit3d2af8a47332235d6556d2d2a40f7392269cf0b0 (patch)
tree75f75e4dd2bbae0106b77e333213ee6c9b6d4754 /src/Plugins/Monitors/Batt.hs
parent7e89ff8e2007e057a0b00a5a9c1fd953c565db25 (diff)
downloadxmobar-3d2af8a47332235d6556d2d2a40f7392269cf0b0.tar.gz
xmobar-3d2af8a47332235d6556d2d2a40f7392269cf0b0.tar.bz2
New N/A string monitor option (cf. #119)
Diffstat (limited to 'src/Plugins/Monitors/Batt.hs')
-rw-r--r--src/Plugins/Monitors/Batt.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Plugins/Monitors/Batt.hs b/src/Plugins/Monitors/Batt.hs
index 410aec6..4976b61 100644
--- a/src/Plugins/Monitors/Batt.hs
+++ b/src/Plugins/Monitors/Batt.hs
@@ -165,7 +165,7 @@ runBatt' bfs args = do
do l <- fmtPercent x
ws <- fmtWatts w opts suffix d
parseTemplate (l ++ [s, fmtTime $ floor t, ws])
- NA -> return "N/A"
+ NA -> getConfigValue naString
where fmtPercent :: Float -> Monitor [String]
fmtPercent x = do
let x' = minimum [1, x]