summaryrefslogtreecommitdiffhomepage
path: root/src/Plugins/Monitors/Top.hs
diff options
context:
space:
mode:
authorOlivier Schneider <olivier.schneider@kolabnow.com>2018-03-03 15:50:02 +0100
committerOlivier Schneider <olivier.schneider@kolabnow.com>2018-03-07 20:39:21 +0100
commitae37e13986b45150f69d7cfa2555cf6b22ccc3c9 (patch)
treebd6780a415024ad152ba31c385d1d3d3036a51c4 /src/Plugins/Monitors/Top.hs
parent2e28ddc842efeb7835ebfc04bb346c2faae54873 (diff)
downloadxmobar-ae37e13986b45150f69d7cfa2555cf6b22ccc3c9.tar.gz
xmobar-ae37e13986b45150f69d7cfa2555cf6b22ccc3c9.tar.bz2
Add ellipsis option for Monitor's fields and total text
Diffstat (limited to 'src/Plugins/Monitors/Top.hs')
-rw-r--r--src/Plugins/Monitors/Top.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Plugins/Monitors/Top.hs b/src/Plugins/Monitors/Top.hs
index 3d246ff..d60897d 100644
--- a/src/Plugins/Monitors/Top.hs
+++ b/src/Plugins/Monitors/Top.hs
@@ -80,7 +80,7 @@ showInfo nm sms mms = do
let lsms = length sms
nmw = mnw - lsms - 1
nmx = mxw - lsms - 1
- rnm = if nmw > 0 then padString nmw nmx " " True nm else nm
+ rnm = if nmw > 0 then padString nmw nmx " " True "" nm else nm
mstr <- showWithColors' sms mms
both <- showWithColors' (rnm ++ " " ++ sms) mms
return [nm, mstr, both]