summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2017-05-27 03:26:11 +0200
committerjao <jao@gnu.org>2017-05-27 03:26:11 +0200
commit61bd7931b65044acab087c09a9b70d56432f1fe9 (patch)
tree00ca97bff7a44b2f4d17951e366efed6586d1d89
parent95e27434fc70be6d028ecf0a92708b956adb03bd (diff)
downloadxmobar-61bd7931b65044acab087c09a9b70d56432f1fe9.tar.gz
xmobar-61bd7931b65044acab087c09a9b70d56432f1fe9.tar.bz2
Fix for vertical bars (should fix issue #303)
-rw-r--r--src/Plugins/Monitors/Common.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Plugins/Monitors/Common.hs b/src/Plugins/Monitors/Common.hs
index 5f088cf..55f67d7 100644
--- a/src/Plugins/Monitors/Common.hs
+++ b/src/Plugins/Monitors/Common.hs
@@ -510,7 +510,7 @@ showLogBar :: Float -> Float -> Monitor String
showLogBar f v = logScaling f v >>= showPercentBar v
showLogVBar :: Float -> Float -> Monitor String
-showLogVBar f v = logScaling f v >>= showPercentBar v
+showLogVBar f v = logScaling f v >>= showVerticalBar v
showLogIconPattern :: Maybe IconPattern -> Float -> Float -> Monitor String
showLogIconPattern str f v = logScaling f v >>= showIconPattern str