From 23171ad90be103f663a21c080ffe7fbb9d0be0f6 Mon Sep 17 00:00:00 2001
From: Sibi Prabakaran <sibi@psibi.in>
Date: Sun, 21 Jun 2020 13:22:10 +0530
Subject: Fix hlint warnings

---
 src/Xmobar/Plugins/Monitors/Common/Output.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/Xmobar/Plugins/Monitors/Common')

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)
-- 
cgit v1.2.3