diff options
| author | Eric Mrak <mail@ericmrak.info> | 2014-03-15 14:29:30 -0700 |
|---|---|---|
| committer | Eric Mrak <mail@ericmrak.info> | 2014-03-15 14:29:30 -0700 |
| commit | b1c1b938123b585ccdb66c69e1e7a2903a8e97ad (patch) | |
| tree | 8c6eafbd15829df3e527509a6737ffb59c5b24c3 /src/Plugins/Monitors/Batt.hs | |
| parent | 48167e6f50f61453a269b321c8d3c8dad7a347b4 (diff) | |
| download | xmobar-b1c1b938123b585ccdb66c69e1e7a2903a8e97ad.tar.gz xmobar-b1c1b938123b585ccdb66c69e1e7a2903a8e97ad.tar.bz2 | |
showVerticalBar now takes the same arguments as showPercentBar
Diffstat (limited to 'src/Plugins/Monitors/Batt.hs')
| -rw-r--r-- | src/Plugins/Monitors/Batt.hs | 2 |
1 files changed, 1 insertions, 1 deletions
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 "") |