From b1c1b938123b585ccdb66c69e1e7a2903a8e97ad Mon Sep 17 00:00:00 2001
From: Eric Mrak <mail@ericmrak.info>
Date: Sat, 15 Mar 2014 14:29:30 -0700
Subject: showVerticalBar now takes the same arguments as showPercentBar

---
 src/Plugins/Monitors/Batt.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Plugins/Monitors/Batt.hs')

diff --git a/src/Plugins/Monitors/Batt.hs b/src/Plugins/Monitors/Batt.hs
index d6b8ce0..3eb2051 100644
--- a/src/Plugins/Monitors/Batt.hs
+++ b/src/Plugins/Monitors/Batt.hs
@@ -174,7 +174,7 @@ runBatt' bfs args = do
           let x' = minimum [1, x]
           p <- showPercentWithColors x'
           b <- showPercentBar (100 * x') x'
-          vb <- showVerticalBar (100 * x')
+          vb <- showVerticalBar (100 * x') x'
           return [b, vb, p]
         fmtWatts x o s d = do
           ws <- showWithPadding $ showDigits d x ++ (if s then "W" else "")
-- 
cgit v1.2.3