From c2da066eceadca4bb6503c975b81a90b27d0e7e3 Mon Sep 17 00:00:00 2001
From: Daniel Schüssler <933504+DanielSchuessler@users.noreply.github.com>
Date: Sat, 6 Oct 2018 20:37:31 +0200
Subject: Fix build warnings

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

diff --git a/src/Plugins/Monitors/Volume.hs b/src/Plugins/Monitors/Volume.hs
index 5702137..0023d41 100644
--- a/src/Plugins/Monitors/Volume.hs
+++ b/src/Plugins/Monitors/Volume.hs
@@ -187,10 +187,10 @@ runVolumeWith opts mixerName controlName = do
 
     getFormatDB :: VolumeOpts -> Maybe Integer -> Monitor String
     getFormatDB _ Nothing = unavailable
-    getFormatDB opts (Just d) = formatDb opts d
+    getFormatDB opts' (Just d) = formatDb opts' d
 
     getFormatSwitch :: VolumeOpts -> Maybe Bool -> Monitor String
     getFormatSwitch _ Nothing = unavailable
-    getFormatSwitch opts (Just sw) = formatSwitch opts sw
+    getFormatSwitch opts' (Just sw) = formatSwitch opts' sw
 
     unavailable = getConfigValue naString
-- 
cgit v1.2.3