summaryrefslogtreecommitdiffhomepage
path: root/src/Xmobar
diff options
context:
space:
mode:
authorSibi Prabakaran <sibi@psibi.in>2020-06-21 13:22:10 +0530
committerjao <jao@gnu.org>2020-06-23 16:38:20 +0100
commit23171ad90be103f663a21c080ffe7fbb9d0be0f6 (patch)
treea3f5b37b0011ce0dd487b325bb2086ba21f63658 /src/Xmobar
parent28ea8d95137131e81c836ed2d446f8925518e85c (diff)
downloadxmobar-23171ad90be103f663a21c080ffe7fbb9d0be0f6.tar.gz
xmobar-23171ad90be103f663a21c080ffe7fbb9d0be0f6.tar.bz2
Fix hlint warnings
Diffstat (limited to 'src/Xmobar')
-rw-r--r--src/Xmobar/Plugins/Monitors/Common/Output.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Xmobar/Plugins/Monitors/Common/Output.hs b/src/Xmobar/Plugins/Monitors/Common/Output.hs
index 8bb52cf..c41ef19 100644
--- a/src/Xmobar/Plugins/Monitors/Common/Output.hs
+++ b/src/Xmobar/Plugins/Monitors/Common/Output.hs
@@ -101,8 +101,8 @@ pSetColor config str s =
Just c -> "<fc=" ++ c ++ ">" ++ str ++ "</fc>"
pShowWithPadding :: MonitorConfig -> String -> String
-pShowWithPadding MonitorConfig {..} s =
- padString pMinWidth pMaxWidth pPadChars pPadRight pMaxWidthEllipsis s
+pShowWithPadding MonitorConfig {..} =
+ padString pMinWidth pMaxWidth pPadChars pPadRight pMaxWidthEllipsis
pFloatToPercent :: MonitorConfig -> Float -> String
pFloatToPercent MonitorConfig{..} n = let p = showDigits 0 (n * 100)